From: Richard M. Stallman Date: Thu, 21 May 1998 20:32:09 +0000 (+0000) Subject: Comment change. X-Git-Tag: emacs-20.3~901 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=537b6e4e55b8e0b7c402cdff98e434cc4ec0c0f5;p=emacs.git Comment change. --- diff --git a/lisp/startup.el b/lisp/startup.el index c67fa8b6762..9aef3420dce 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -361,7 +361,11 @@ and any subdirectory that contains a file named `.nosearch'." (setq contents (cdr contents))))) (normal-top-level-add-to-load-path (cdr (nreverse dirs))))) -;; This function is called from the subdirs.el file. +;; This function is called from a subdirs.el file. +;; It assumes that default-directory is the directory +;; in which the subdirs.el file exists, +;; and it adds to load-path the subdirs of that directory +;; as specified in DIRS. Normally the elements of DIRS are relative. (defun normal-top-level-add-to-load-path (dirs) (let ((tail load-path) (thisdir (directory-file-name default-directory)))