From 2e6d579f7cb88d475d0d8dbca14dca80a4a43a54 Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Fri, 11 Jun 1999 12:20:25 +0000
Subject: [PATCH] New file. It is supposed to be used for telling old Emacsen
 where EMU, APEL or CUSTOM packages have already installed.

---
 sample.lpath.el |   28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 sample.lpath.el

diff --git a/sample.lpath.el b/sample.lpath.el
new file mode 100644
index 0000000..4a17420
--- /dev/null
+++ b/sample.lpath.el
@@ -0,0 +1,28 @@
+;; 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 make gnus with Mule 2.3 based on
+;; Emacs 19.34, copy this file to `~/.lpath.el' and modify it suitably
+;; for your environment.
+
+(when (boundp 'MULE)
+  (let ((EMU
+	 ;; Where is EMU packege?
+	 "/usr/local/share/mule/19.34/site-lisp"
+	 )
+	(APEL
+	 ;; Where is APEL package?
+	 "/usr/local/share/mule/site-lisp/apel"
+	 )
+	(CUSTOM
+	 ;; Where is CUSTOM package?
+	 "/usr/local/share/mule/site-lisp/custom"
+	 ))
+    ;; No user servicable parts beyond this point.
+
+    (when (string-match "/apel/?$" APEL)
+      (setq APEL (substring APEL 0 (match-beginning 0))))
+    (setq load-path (nconc (list EMU APEL CUSTOM) load-path))))
-- 
1.7.10.4