(command-line): Use `get-load-suffixes' instead of `load-suffixes'.

diff --git a/lisp/startup.el b/lisp/startup.el
index 28a501e..2245cb9 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -646,7 +646,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
   (let ((lisp-dir
         (file-name-directory
          (locate-file "simple" load-path
-                      load-suffixes))))
+                      (get-load-suffixes)))))
 
     (setq load-history
          (mapcar (lambda (elt)