Mercurial > emacs

comparison lisp/emulation/viper-keym.el @ 18172:e145ccc61a22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
new version
author Michael Kifer <kifer@cs.stonybrook.edu>
date Mon, 09 Jun 1997 04:00:50 +0000
parents 1b06411ccc04
children 3a43376db2be
comparison
equal deleted inserted replaced
18171:566b6cf773ed 18172:e145ccc61a22
29 (defvar vip-mode-string) 29 (defvar vip-mode-string)
30 (defvar vip-expert-level) 30 (defvar vip-expert-level)
31 (defvar vip-ex-style-editing-in-insert) 31 (defvar vip-ex-style-editing-in-insert)
32 (defvar vip-ex-style-motion) 32 (defvar vip-ex-style-motion)
33 33
34 (eval-when-compile 34 ;; loading happens only in non-interactive compilation
35 (let ((load-path (cons (expand-file-name ".") load-path))) 35 ;; in order to spare non-viperized emacs from being viperized
36 (or (featurep 'viper-util) 36 (if noninteractive
37 (load "viper-util.el" nil nil 'nosuffix)) 37 (eval-when-compile
38 )) 38 (let ((load-path (cons (expand-file-name ".") load-path)))
39 (or (featurep 'viper-util)
40 (load "viper-util.el" nil nil 'nosuffix))
41 )))
39 ;; end pacifier 42 ;; end pacifier
40 43
41 (require 'viper-util) 44 (require 'viper-util)
42 45
43 46