mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
(top-level): Don't load viper-util when compiling. Move provide
statement to end.
This commit is contained in:
parent
e83e8ab56f
commit
694bc3c6e1
@ -26,8 +26,6 @@
|
||||
|
||||
;;; Code:
|
||||
|
||||
(provide 'viper-keym)
|
||||
|
||||
;; compiler pacifier
|
||||
(defvar viper-always)
|
||||
(defvar viper-current-state)
|
||||
@ -35,15 +33,6 @@
|
||||
(defvar viper-expert-level)
|
||||
(defvar viper-ex-style-editing)
|
||||
(defvar viper-ex-style-motion)
|
||||
|
||||
;; loading happens only in non-interactive compilation
|
||||
;; in order to spare non-viperized emacs from being viperized
|
||||
(if noninteractive
|
||||
(eval-when-compile
|
||||
(let ((load-path (cons (expand-file-name ".") load-path)))
|
||||
(or (featurep 'viper-util)
|
||||
(load "viper-util.el" nil t 'nosuffix))
|
||||
)))
|
||||
;; end pacifier
|
||||
|
||||
(require 'viper-util)
|
||||
@ -705,6 +694,9 @@ form ((key . function) (key . function) ... )."
|
||||
alist))
|
||||
|
||||
|
||||
(provide 'viper-keym)
|
||||
|
||||
|
||||
;;; Local Variables:
|
||||
;;; eval: (put 'viper-deflocalvar 'lisp-indent-hook 'defun)
|
||||
;;; End:
|
||||
|
Loading…
Reference in New Issue
Block a user