diff options
| author | Glenn Morris <rgm@gnu.org> | 2018-02-27 13:02:02 -0500 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2018-02-27 13:02:02 -0500 |
| commit | f8df49c3a9522780a04facad1fc11fef3508716b (patch) | |
| tree | 50af3b10559fb3e10266862e1354992b3083b5bc /lisp/emulation/viper-util.el | |
| parent | e7a5b1bb671f0bc1c4dfbbbfc7b5ba1de1f39897 (diff) | |
| download | emacs-f8df49c3a9522780a04facad1fc11fef3508716b.tar.gz | |
Remove free variable warning when compiling viper using .el files
* lisp/emulation/viper-cmd.el (viper-saved-mark): Move definition...
* lisp/emulation/viper-util.el (viper-saved-mark): ... to here.
Diffstat (limited to 'lisp/emulation/viper-util.el')
| -rw-r--r-- | lisp/emulation/viper-util.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emulation/viper-util.el b/lisp/emulation/viper-util.el index f0540401803..9fd68b7a61f 100644 --- a/lisp/emulation/viper-util.el +++ b/lisp/emulation/viper-util.el @@ -39,7 +39,6 @@ (defvar ex-unix-type-shell-options) (defvar viper-ex-tmp-buf-name) (defvar viper-syntax-preference) -(defvar viper-saved-mark) (require 'ring) @@ -886,6 +885,9 @@ Otherwise return the normal value." (if (featurep 'xemacs) (mark-marker t) (mark-marker))) +(defvar viper-saved-mark nil + "Where viper saves mark. This mark is resurrected by m^.") + ;; like (set-mark-command nil) but doesn't push twice, if (car mark-ring) ;; is the same as (mark t). (defsubst viper-set-mark-if-necessary () |