# HG changeset patch # User Michael Kifer # Date 869589349 0 # Node ID 2ee8fcd35fac5ec0e5f4616b52330e64d208245e # Parent 67642fb78fc43fd7704f9c62a0ce6d6d27646484 new version diff -r 67642fb78fc4 -r 2ee8fcd35fac lisp/emulation/viper.el --- a/lisp/emulation/viper.el Tue Jul 22 03:45:44 1997 +0000 +++ b/lisp/emulation/viper.el Tue Jul 22 16:35:49 1997 +0000 @@ -310,6 +310,8 @@ (if noninteractive (eval-when-compile (let ((load-path (cons (expand-file-name ".") load-path))) + (or (featurep 'viper-init) + (load "viper-init.el" nil nil 'nosuffix)) (or (featurep 'viper-cmd) (load "viper-cmd.el" nil nil 'nosuffix)) )))