This commit was manufactured by cvs2svn to create branch

[elisp/gnus.git-] / sample.lpath.el

diff --git a/sample.lpath.el b/sample.lpath.el
deleted file mode 100644 (file)
index f93c8da..0000000
--- a/sample.lpath.el
+++ /dev/null
@@ -1,42 +0,0 @@
-;; This is a sample of `~/.lpath.el' file.
-;;
-;; This file will be loaded from dgnushack.el at the compile time.  It
-;; is supposed to be used for telling old Emacsen where EMU, APEL or
-;; CUSTOM packages have already installed.
-;;
-;; For instance, if you would like to build T-gnus with Mule 2.3 based
-;; on Emacs 19.34, copy this file to `~/.lpath.el' and edit it suitably
-;; for your environment.
-
-(if (boundp 'MULE)
-    (let ((additional-load-path
-          (list
-           ;; Where is EMU packege?
-           "/usr/local/share/mule/19.34/site-lisp/"
-           ;; Where is APEL package?
-           "/usr/local/share/mule/site-lisp/apel/"
-           ;; Where is CUSTOM package?
-           "/usr/local/share/mule/site-lisp/custom/"
-
-           ;; Note that you have no need to specify paths of FLIM, SEMI
-           ;; or WEMI if they are installed under the directory which is
-           ;; same as the parent directory of APEL.
-
-           ;; If you have installed Emacs W3 package,
-           ;; uncomment and edit the following line appropriately.
-           ;; "/usr/local/share/mule/site-lisp/w3/"
-           )))
-      ;; No user serviceable parts beyond this point.
-\f
-      (let ((i (length additional-load-path))
-           p)
-       (while (> i 0)
-         (setq i (1- i)
-               p (nth i additional-load-path))
-         (if (file-directory-p p)
-             (progn
-               (if (string-match "/apel/?$" p)
-                   (setq load-path
-                         (cons (substring p 0 (1+ (match-beginning 0)))
-                               load-path)))
-               (setq load-path (cons p load-path))))))))