From: Luc Teirlinck <teirllm@auburn.edu>
Date: Mon, 27 Feb 2006 01:56:19 +0000 (+0000)
Subject: (command-line): Use `get-load-suffixes' instead of `load-suffixes'.
X-Git-Tag: emacs-pretest-22.0.90~3888
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dd4451e037087843da6be8105b318c96c3a98cfb;p=emacs.git

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

diff --git a/lisp/startup.el b/lisp/startup.el
index 28a501e68a9..2245cb92535 100644
--- 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)