# HG changeset patch # User Glenn Morris # Date 1196629313 0 # Node ID 696a6b8decffadd1772e6471f9840ed71e2002a4 # Parent 3824759a1317390768e199dafddf24cf627466ad (top-level): Don't load viper-util when compiling. Move provide statement to end. diff -r 3824759a1317 -r 696a6b8decff lisp/emulation/viper-keym.el --- a/lisp/emulation/viper-keym.el Sun Dec 02 21:01:17 2007 +0000 +++ b/lisp/emulation/viper-keym.el Sun Dec 02 21:01:53 2007 +0000 @@ -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 @@ alist)) +(provide 'viper-keym) + + ;;; Local Variables: ;;; eval: (put 'viper-deflocalvar 'lisp-indent-hook 'defun) ;;; End: