Mercurial > emacs
changeset 44203:621fbfd0bf87
(list-load-path-shadows): Only ignore last copy of standard Lisp
directories.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 28 Mar 2002 18:15:32 +0000 |
| parents | f6eb1080b681 |
| children | c9cbe448711d |
| files | lisp/emacs-lisp/shadow.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/shadow.el Thu Mar 28 18:14:53 2002 +0000 +++ b/lisp/emacs-lisp/shadow.el Thu Mar 28 18:15:32 2002 +0000 @@ -214,10 +214,10 @@ (setq tem (cdr tem))) (if (> (length toplevs) 1) ;; Cut off our copy of load-path right before - ;; the second directory which has simple.el in it. + ;; the last directory which has simple.el in it. ;; This avoids loads of duplications between the source dir ;; and the dir where these files were copied by installation. - (let ((break (nth (- (length toplevs) 2) toplevs))) + (let ((break (car toplevs))) (setq tem path) (while tem (if (eq (nth 1 tem) break)