tm 6.63
[elisp/tm.git] / gnus / g4-path
index 00922bb..a0cf7a4 100644 (file)
@@ -5,13 +5,16 @@
 ;;;
 (setq load-path
       (append
-       '("." ".." "../../tl"
-        ;;
-        ;; (ding) GNUS path
-        ;;
-        ;; please edit this
-        ;;
-        ;;"/usr/local/lib/emacs/local.lisp/gnus-4.1/lisp
-        ;;
-        )
+       (mapcar (function
+               (lambda (path)
+                 (expand-file-name path (getenv "PWD"))
+                 ))
+              '("." ".." "../../tl/" "../../mel/"))
+       ;;
+       ;; additional path
+       ;;
+       ;; please edit this
+       ;;
+       ;;'("/usr/local/lib/emacs/local.lisp/gnus-4.1/lisp")
+       ;;
        load-path))