[comp.emacs] Gold key -- correction to last message

mdb@amadeus.UUCP (Mark D. Baushke) (10/10/87)

Oops. Correction to last message.

The my-load-path variable is outside of the (let ...)
expression for both (setq load-path ...) statements. The lisp code
should read:

(if (not (let ((found nil)
	       (t-list load-path)
	       (my-load-path (expand-file-name "~/emacs-lisp")))
	   (while (and (not found)
		       t-list)
	     (if (equal (car t-list) my-load-path)
		 (setq found t-list))
	     (setq t-list (cdr t-list)))
	   found))
    (setq load-path (cons (expand-file-name "~/emacs-lisp") load-path)))

or if you don't care that you might already have "~/emacs-lisp" in your
load path, just adding the next line is good enough

	(setq load-path (cons (expand-file-name "~/emacs-lisp") load-path))


Mark Baushke
UUCP: ...!sun!silvlis!mdb