aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2005-08-07 17:38:36 +0000
committerRichard M. Stallman2005-08-07 17:38:36 +0000
commite09b9180d525e04497271f23cb7fc99fea21421e (patch)
treeb018133bac85d68a7e4aebb53a9add701117793c
parent780a7814436dd62e3a1e8a888fde43fb899dcfdc (diff)
downloademacs-e09b9180d525e04497271f23cb7fc99fea21421e.tar.gz
emacs-e09b9180d525e04497271f23cb7fc99fea21421e.zip
(endif): Convert -script into -scriptload.
(standard_args): Add -scriptload. Allow -basic-display with one dash.
-rw-r--r--src/emacs.c9
1 files changed, 5 insertions, 4 deletions
diff --git a/src/emacs.c b/src/emacs.c
index 87aee828420..985a3eae96f 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -1153,9 +1153,9 @@ main (argc, argv
1153 if (argmatch (argv, argc, "-script", "--script", 3, &junk, &skip_args)) 1153 if (argmatch (argv, argc, "-script", "--script", 3, &junk, &skip_args))
1154 { 1154 {
1155 noninteractive = 1; /* Set batch mode. */ 1155 noninteractive = 1; /* Set batch mode. */
1156 /* Convert --script to -l, un-skip it, and sort again so that -l will be 1156 /* Convert --script to --scriptload, un-skip it, and sort again
1157 handled in proper sequence. */ 1157 so that it will be handled in proper sequence. */
1158 argv[skip_args - 1] = "-l"; 1158 argv[skip_args - 1] = "-scriptload";
1159 skip_args -= 2; 1159 skip_args -= 2;
1160 sort_args (argc, argv); 1160 sort_args (argc, argv);
1161 } 1161 }
@@ -1834,7 +1834,7 @@ struct standard_args standard_args[] =
1834 { "-itype", 0, 15, 0 }, 1834 { "-itype", 0, 15, 0 },
1835 { "-iconic", "--iconic", 15, 0 }, 1835 { "-iconic", "--iconic", 15, 0 },
1836 { "-D", "--basic-display", 12, 0}, 1836 { "-D", "--basic-display", 12, 0},
1837 { "--basic-display", 0, 12, 0}, 1837 { "-basic-display", 0, 12, 0},
1838 { "-bg", "--background-color", 10, 1 }, 1838 { "-bg", "--background-color", 10, 1 },
1839 { "-background", 0, 10, 1 }, 1839 { "-background", 0, 10, 1 },
1840 { "-fg", "--foreground-color", 10, 1 }, 1840 { "-fg", "--foreground-color", 10, 1 },
@@ -1868,6 +1868,7 @@ struct standard_args standard_args[] =
1868 { "-directory", 0, 0, 1 }, 1868 { "-directory", 0, 0, 1 },
1869 { "-l", "--load", 0, 1 }, 1869 { "-l", "--load", 0, 1 },
1870 { "-load", 0, 0, 1 }, 1870 { "-load", 0, 0, 1 },
1871 { "-scriptload", "--scriptload", 0, 1 },
1871 { "-f", "--funcall", 0, 1 }, 1872 { "-f", "--funcall", 0, 1 },
1872 { "-funcall", 0, 0, 1 }, 1873 { "-funcall", 0, 0, 1 },
1873 { "-eval", "--eval", 0, 1 }, 1874 { "-eval", "--eval", 0, 1 },