comparison lisp/viper/viper-util.el @ 163:0132846995bd r20-3b8

Import from CVS: tag r20-3b8
author cvs
date Mon, 13 Aug 2007 09:43:35 +0200
parents cf808b4c4290
children 2d532a89d707
comparison
equal deleted inserted replaced
162:4de2936b4e77 163:0132846995bd
37 (defvar vip-ex-tmp-buf-name) 37 (defvar vip-ex-tmp-buf-name)
38 38
39 (require 'cl) 39 (require 'cl)
40 (require 'ring) 40 (require 'ring)
41 41
42 (and noninteractive 42 (if noninteractive
43 (eval-when-compile 43 (eval-when-compile
44 (let ((load-path (cons (expand-file-name ".") load-path))) 44 (let ((load-path (cons (expand-file-name ".") load-path)))
45 (or (featurep 'viper-init) 45 (or (featurep 'viper-init)
46 (load "viper-init.el" nil nil 'nosuffix)) 46 (load "viper-init.el" nil nil 'nosuffix))
47 ))) 47 )))
48 ;; end pacifier 48 ;; end pacifier
49 49
50 (require 'viper-init) 50 (require 'viper-init)
51 51
52 52