From: morioka <morioka>
Date: Thu, 17 Sep 1998 17:05:46 +0000 (+0000)
Subject: (install-detect-elisp-directory): Fix problem on Nemacs.
X-Git-Tag: poe-199811302358~12
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=27bc86513a056acc412e5246358ff7c1caadf463;p=elisp%2Fapel.git

(install-detect-elisp-directory): Fix problem on Nemacs.
---

diff --git a/install.el b/install.el
index 4995610..f5a0d4e 100644
--- a/install.el
+++ b/install.el
@@ -163,13 +163,12 @@
   (or
    (catch 'tag
      (let ((rest default-load-path)
+	   (pat (concat "^"
+			(expand-file-name (concat ".*/" elisp-prefix) prefix)
+			"/?$"))
 	   dir)
        (while (setq dir (car rest))
-	 (if (string-match
-	      (` (, (concat "^"
-			    (expand-file-name (concat ".*/" elisp-prefix) prefix)
-			    "/?$")))
-	      dir)
+	 (if (string-match pat dir)
 	     (if (or allow-version-specific
 		     (not (string-match (format "%d\\.%d"
 						emacs-major-version