(install-detect-elisp-directory): Fix problem on Nemacs.
[elisp/apel.git] / install.el
index 4995610..f5a0d4e 100644 (file)
   (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