X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=gnus%2Fg4-path;h=a0cf7a4f1d5906c82a8e1ab8356188626ca14959;hb=424f06342096f9fcf57986cb6985c010911a4320;hp=00922bb95010344afd9a04b4b5b1dc921d9d3413;hpb=d08665e7a6b365c8605933c756812403c1a504f2;p=elisp%2Ftm.git

diff --git a/gnus/g4-path b/gnus/g4-path
index 00922bb..a0cf7a4 100644
--- a/gnus/g4-path
+++ b/gnus/g4-path
@@ -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))