;;; -*-Emacs-Lisp-*-
;;;
-;;; loadpath for GNUS 4
+;;; loadpath for GNUS 4.*
;;;
-(setq load-path
- (append
- (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))
+
+(require 'tl-misc)
+
+;;;
+;;; loadpath for GNUS 4.*
+;;;
+
+;; please edit
+(add-path "gnus-4.1/lisp" 'all-paths)