(command-line-1): Rename -internal-script back to -scriptload (reverts

previous change).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b65b3507d72033f700cb23a721dc441e417c6168..8fc0bece69c46be2a8428fb6d8ac9e9762535b0f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-03-14  Glenn Morris  <rgm@gnu.org>
 
+       * startup.el (command-line-1): Rename -internal-script back to
+       -scriptload (reverts previous change).
+
        * textmodes/org-irc.el (top-level): CL not required when compiling.
        (org-irc-visit-erc): Replace runtime CL functions.
 

diff --git a/lisp/startup.el b/lisp/startup.el
index 5013da48ba1a67b6ef1a1e5dd0529fd557c41515..f5ce1b7badd62b57485a7302f839bc5c83227330 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -2086,7 +2086,7 @@ A fancy display is used on graphic displays, normal otherwise."
 
                  ;; This is used to handle -script.  It's not clear
                  ;; we need to document it (it is totally internal).
-                 ((member argi '("-internal-script"))
+                 ((member argi '("-scriptload"))
                   (let* ((file (command-line-normalize-file-name
                                 (or argval (pop command-line-args-left))))
                          ;; Take file from default dir.