From: morioka Date: Tue, 13 May 1997 14:32:15 +0000 (+0000) Subject: Add site-lisp/apel/ even if LISPDIR is specified. X-Git-Tag: semi-0_88~17 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=874be6ee6b4325d50d402dbfac791c109a8e65f0;p=elisp%2Fsemi.git Add site-lisp/apel/ even if LISPDIR is specified. --- diff --git a/SEMI-CFG b/SEMI-CFG index 1575321..cda0c6e 100644 --- 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) @@ -14,14 +14,13 @@ ;; ) ;; 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)