]> git.eshelyaron.com Git - emacs.git/commitdiff
(endif): Convert -script into -scriptload.
authorRichard M. Stallman <rms@gnu.org>
Sun, 7 Aug 2005 17:38:36 +0000 (17:38 +0000)
committerRichard M. Stallman <rms@gnu.org>
Sun, 7 Aug 2005 17:38:36 +0000 (17:38 +0000)
(standard_args): Add -scriptload.  Allow -basic-display with one dash.

src/emacs.c

index 87aee828420c140ab49bb9606b37fbd164e38729..985a3eae96faf9af9deb0e944146f0bff3c5e6ec 100644 (file)
@@ -1153,9 +1153,9 @@ main (argc, argv
   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 @@ struct standard_args standard_args[] =
   { "-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 @@ struct standard_args standard_args[] =
   { "-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 },