# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1123436316 0
# Node ID 17ea5769514d929fca568baab2e4c4f515883c97
# Parent  369c84bf493fbf4d27f98479594990e85f63c9c4
(endif): Convert -script into -scriptload.
(standard_args): Add -scriptload.  Allow -basic-display with one dash.

diff -r 369c84bf493f -r 17ea5769514d src/emacs.c
--- a/src/emacs.c	Sun Aug 07 17:36:12 2005 +0000
+++ b/src/emacs.c	Sun Aug 07 17:38:36 2005 +0000
@@ -1153,9 +1153,9 @@
   if (argmatch (argv, argc, "-script", "--script", 3, &junk, &skip_args))
     {
       noninteractive = 1;	/* Set batch mode.  */
-      /* Convert --script to -l, un-skip it, and sort again so that -l will be
-	 handled in proper sequence.  */
-      argv[skip_args - 1] = "-l";
+      /* Convert --script to --scriptload, un-skip it, and sort again
+	 so that it will be handled in proper sequence.  */
+      argv[skip_args - 1] = "-scriptload";
       skip_args -= 2;
       sort_args (argc, argv);
     }
@@ -1834,7 +1834,7 @@
   { "-itype", 0, 15, 0 },
   { "-iconic", "--iconic", 15, 0 },
   { "-D", "--basic-display", 12, 0},
-  { "--basic-display", 0, 12, 0},
+  { "-basic-display", 0, 12, 0},
   { "-bg", "--background-color", 10, 1 },
   { "-background", 0, 10, 1 },
   { "-fg", "--foreground-color", 10, 1 },
@@ -1868,6 +1868,7 @@
   { "-directory", 0, 0, 1 },
   { "-l", "--load", 0, 1 },
   { "-load", 0, 0, 1 },
+  { "-scriptload", "--scriptload", 0, 1 },
   { "-f", "--funcall", 0, 1 },
   { "-funcall", 0, 0, 1 },
   { "-eval", "--eval", 0, 1 },