Add site-lisp/apel/ even if LISPDIR is specified.
authormorioka <morioka>
Tue, 13 May 1997 14:32:15 +0000 (14:32 +0000)
committermorioka <morioka>
Tue, 13 May 1997 14:32:15 +0000 (14:32 +0000)
SEMI-CFG

index 1575321..cda0c6e 100644 (file)
--- a/SEMI-CFG
+++ b/SEMI-CFG
@@ -1,6 +1,6 @@
 ;;; -*-Emacs-Lisp-*-
 ;;;
-;;; $Id: SEMI-CFG,v 0.6 1997-05-13 14:06:32 morioka Exp $
+;;; $Id: SEMI-CFG,v 0.7 1997-05-13 14:32:15 morioka Exp $
 ;;;
 
 (defvar default-load-path load-path)
 ;;                          )
 ;;                  load-path))
 
-(if (boundp 'LISPDIR)
-    (progn
-      (add-to-list 'default-load-path LISPDIR)
-      (add-to-list 'load-path LISPDIR)
-      (add-to-list 'load-path (expand-file-name "apel" LISPDIR))
-      )
-  (add-to-list 'load-path
-              (expand-file-name "../../site-lisp/apel" data-directory))
+(add-to-list 'load-path
+            (expand-file-name "../../site-lisp/apel" data-directory))
+
+(when (boundp 'LISPDIR)
+  (add-to-list 'default-load-path LISPDIR)
+  (add-to-list 'load-path LISPDIR)
+  (add-to-list 'load-path (expand-file-name "apel" LISPDIR))
   )
 
 (require 'install)