feature/native-comp 59a40b0 5/6: * lisp/startup.el (command-line): Clean-up logic for new .eln disposition.

[Andrea Corallo]

branch: feature/native-comp
commit 59a40b0d75526c973b5bdd25c41824879aafa515
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    * lisp/startup.el (command-line): Clean-up logic for new .eln disposition.
---
 lisp/startup.el | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/lisp/startup.el b/lisp/startup.el
index 0a81c87..e39df75 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1059,12 +1059,7 @@ please check its value")
          (unless (file-readable-p lispdir)
            (princ (format "Lisp directory %s not readable?" lispdir))
            (terpri)))
-      (setq lisp-dir
-            (file-truename
-             (if (string-match "\\.eln\\'" simple-file-name)
-                 (expand-file-name
-                  (concat (file-name-directory simple-file-name) "../"))
-               (file-name-directory simple-file-name))))
+      (setq lisp-dir (file-truename (file-name-directory simple-file-name)))
       (setq load-history
            (mapcar (lambda (elt)
                      (if (and (stringp (car elt))