tm 7.81.

[elisp/tm.git] / gnus / s-path

diff --git a/gnus/s-path b/gnus/s-path
index 0a58f02..1fcce1c 100644 (file)
--- a/gnus/s-path
+++ b/gnus/s-path
@@ -1,17 +1,21 @@
 ;;; -*-Emacs-Lisp-*-
 
-(setq load-path
-      (append
-       (mapcar (function
-               (lambda (path)
-                 (expand-file-name path (getenv "PWD"))
-                 ))
-              '("." ".." "../../tl/" "../../mel/"))
-       ;;
-       ;; (ding) GNUS path
-       ;;
-       ;; please edit this
-       ;;
-       '("/usr/local/lib/emacs/site-lisp/sgnus-0.14/lisp")
-       ;;
-       load-path))
+(require 'tl-misc)
+
+;;;
+;;; loadpath for Gnus 5.2
+;;;
+
+;; please edit
+
+;; It is for latest September Gnus.
+(let ((path (get-latest-path "gnus-5.2")))
+  (if path
+      (add-path (expand-file-name "lisp/" path))
+    ))
+
+;; It is relative style. Added path is searched from load-path.
+;; (add-path "gnus-5.2.10/lisp/" 'all-paths)
+
+;; It is absolute style.
+;; (add-path "/usr/local/share/emacs/site-lisp/gnus-5.2.10/lisp/")