From 7140eb0dfbde883aa7a352dd20786c68d58d1bcd Mon Sep 17 00:00:00 2001 From: yamaoka Date: Fri, 1 Dec 2000 05:26:33 +0000 Subject: [PATCH] * lisp/lpath.el: Attempt to add another FLIM path to `load-path' if the module `mel' does not found. This procedure may be needed when recent FLIM 1.14 is used under old Emacsen. --- ChangeLog | 6 ++++++ lisp/lpath.el | 13 +++++++++++++ 2 files changed, 19 insertions(+) diff --git a/ChangeLog b/ChangeLog index 981e30b..4a25124 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2000-12-01 Katsumi Yamaoka + + * lisp/lpath.el: Attempt to add another FLIM path to `load-path' if + the module `mel' does not found. This procedure may be needed when + recent FLIM 1.14 is used under old Emacsen. + 2000-11-27 Katsumi Yamaoka * lisp/gnus-vers.el (gnus-revision-number): Increment to 08. diff --git a/lisp/lpath.el b/lisp/lpath.el index 49b5eae..be06dbd 100644 --- a/lisp/lpath.el +++ b/lisp/lpath.el @@ -6,6 +6,19 @@ (load "apel/path-util")) (add-path "apel") (add-path "flim") +(unless (module-installed-p 'mel) + ;; FLIM 1.14 may have installed in two "flim" subdirectories. + (push (expand-file-name "flim" + (file-name-directory (get-latest-path "^apel$" t))) + load-path) + (unless (module-installed-p 'mel) + (error " +FLIM package does not found in %s. +Try to re-configure with --with-addpath=FLIM_PATH and run make again. +" + (progn + (add-path "semi") + load-path)))) (add-path "semi") (defun maybe-fbind (args) -- 1.7.10.4