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

previous change).

2 files changed, 4 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b65b3507d72..8fc0bece69c 100644
--- 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 5013da48ba1..f5ce1b7badd 100644
--- 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.