diff options
| author | Glenn Morris <rgm@gnu.org> | 2007-12-02 21:04:10 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2007-12-02 21:04:10 +0000 |
| commit | b01fc9c9d9ffef1541ae0a7e1bb5004cef4ba37a (patch) | |
| tree | 34d59ab180eee047f6faa494c3b3a5527e055df9 /lisp/emulation | |
| parent | eec597ed4a3668eaa3686a9c767995cc4e85c8a1 (diff) | |
| download | emacs-b01fc9c9d9ffef1541ae0a7e1bb5004cef4ba37a.tar.gz | |
(top-level): Don't require advice.
Don't load viper-util, viper-keym, viper-mous, viper-macs, viper-ex
when compiling.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/viper-cmd.el | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index d6786c01987..5637fad59c7 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el @@ -27,7 +27,6 @@ ;;; Code: (provide 'viper-cmd) -(require 'advice) ;; Compiler pacifier (defvar viper-minibuffer-current-face) @@ -48,23 +47,6 @@ (defvar initial) (defvar undo-beg-posn) (defvar undo-end-posn) - -;; 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)) - (or (featurep 'viper-keym) - (load "viper-keym.el" nil t 'nosuffix)) - (or (featurep 'viper-mous) - (load "viper-mous.el" nil t 'nosuffix)) - (or (featurep 'viper-macs) - (load "viper-macs.el" nil t 'nosuffix)) - (or (featurep 'viper-ex) - (load "viper-ex.el" nil t 'nosuffix)) - ))) ;; end pacifier |