Commit fd298e02 authored by Glenn Morris's avatar Glenn Morris
Browse files

Load viper*.el files silently.

parent 1007a0a7
......@@ -55,15 +55,15 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-util)
(load "viper-util.el" nil nil 'nosuffix))
(load "viper-util.el" nil t 'nosuffix))
(or (featurep 'viper-keym)
(load "viper-keym.el" nil nil 'nosuffix))
(load "viper-keym.el" nil t 'nosuffix))
(or (featurep 'viper-mous)
(load "viper-mous.el" nil nil 'nosuffix))
(load "viper-mous.el" nil t 'nosuffix))
(or (featurep 'viper-macs)
(load "viper-macs.el" nil nil 'nosuffix))
(load "viper-macs.el" nil t 'nosuffix))
(or (featurep 'viper-ex)
(load "viper-ex.el" nil nil 'nosuffix))
(load "viper-ex.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -48,11 +48,11 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-util)
(load "viper-util.el" nil nil 'nosuffix))
(load "viper-util.el" nil t 'nosuffix))
(or (featurep 'viper-keym)
(load "viper-keym.el" nil nil 'nosuffix))
(load "viper-keym.el" nil t 'nosuffix))
(or (featurep 'viper-cmd)
(load "viper-cmd.el" nil nil 'nosuffix))
(load "viper-cmd.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -42,7 +42,7 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-util)
(load "viper-util.el" nil nil 'nosuffix))
(load "viper-util.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -40,13 +40,13 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-util)
(load "viper-util.el" nil nil 'nosuffix))
(load "viper-util.el" nil t 'nosuffix))
(or (featurep 'viper-keym)
(load "viper-keym.el" nil nil 'nosuffix))
(load "viper-keym.el" nil t 'nosuffix))
(or (featurep 'viper-mous)
(load "viper-mous.el" nil nil 'nosuffix))
(load "viper-mous.el" nil t 'nosuffix))
(or (featurep 'viper-cmd)
(load "viper-cmd.el" nil nil 'nosuffix))
(load "viper-cmd.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -43,9 +43,9 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-util)
(load "viper-util.el" nil nil 'nosuffix))
(load "viper-util.el" nil t 'nosuffix))
(or (featurep 'viper-cmd)
(load "viper-cmd.el" nil nil 'nosuffix))
(load "viper-cmd.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -48,7 +48,7 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-init)
(load "viper-init.el" nil nil 'nosuffix))
(load "viper-init.el" nil t 'nosuffix))
)))
;; end pacifier
......
......@@ -313,9 +313,9 @@
(eval-when-compile
(let ((load-path (cons (expand-file-name ".") load-path)))
(or (featurep 'viper-init)
(load "viper-init.el" nil nil 'nosuffix))
(load "viper-init.el" nil t 'nosuffix))
(or (featurep 'viper-cmd)
(load "viper-cmd.el" nil nil 'nosuffix))
(load "viper-cmd.el" nil t 'nosuffix))
)))
;; end pacifier
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment