comparison src/emacs.c @ 92892:dc8ef1d9d71d

(main): Revert previous change. (standard_args): Revert -internal-script back to -scriptload, and remove the long-option form.
author Glenn Morris <rgm@gnu.org>
date Fri, 14 Mar 2008 02:40:13 +0000
parents eb36bc19579d
children 7a919633882d
comparison
equal deleted inserted replaced
92891:61f4584a0830 92892:dc8ef1d9d71d
1131 Vundo_outer_limit = Qnil; 1131 Vundo_outer_limit = Qnil;
1132 } 1132 }
1133 if (argmatch (argv, argc, "-script", "--script", 3, &junk, &skip_args)) 1133 if (argmatch (argv, argc, "-script", "--script", 3, &junk, &skip_args))
1134 { 1134 {
1135 noninteractive = 1; /* Set batch mode. */ 1135 noninteractive = 1; /* Set batch mode. */
1136 /* Convert --script to -internal-script, un-skip it, and sort again 1136 /* Convert --script to -scriptload, un-skip it, and sort again
1137 so that it will be handled in proper sequence. */ 1137 so that it will be handled in proper sequence. */
1138 /* FIXME broken for --script=FILE - is that supposed to work? */ 1138 /* FIXME broken for --script=FILE - is that supposed to work? */
1139 argv[skip_args - 1] = "-internal-script"; 1139 argv[skip_args - 1] = "-scriptload";
1140 skip_args -= 2; 1140 skip_args -= 2;
1141 sort_args (argc, argv); 1141 sort_args (argc, argv);
1142 } 1142 }
1143 1143
1144 /* Handle the --help option, which gives a usage message. */ 1144 /* Handle the --help option, which gives a usage message. */
1870 so they are not reordered with respect to those. */ 1870 so they are not reordered with respect to those. */
1871 { "-L", "--directory", 0, 1 }, 1871 { "-L", "--directory", 0, 1 },
1872 { "-directory", 0, 0, 1 }, 1872 { "-directory", 0, 0, 1 },
1873 { "-l", "--load", 0, 1 }, 1873 { "-l", "--load", 0, 1 },
1874 { "-load", 0, 0, 1 }, 1874 { "-load", 0, 0, 1 },
1875 /* This was --scriptload, but that confuses sort_args, because then 1875 /* This has no longname, because using --scriptload confuses sort_args,
1876 the --script long option seems to match twice; ie you can't have 1876 because then the --script long option seems to match twice; ie
1877 a long option which is a prefix of another long option. 1877 you can't have a long option which is a prefix of another long
1878 In any case, this is entirely an internal option. */ 1878 option. In any case, this is entirely an internal option. */
1879 { "-internal-script", "--internal-script", 0, 1 }, 1879 { "-scriptload", NULL, 0, 1 },
1880 { "-f", "--funcall", 0, 1 }, 1880 { "-f", "--funcall", 0, 1 },
1881 { "-funcall", 0, 0, 1 }, 1881 { "-funcall", 0, 0, 1 },
1882 { "-eval", "--eval", 0, 1 }, 1882 { "-eval", "--eval", 0, 1 },
1883 { "-execute", "--execute", 0, 1 }, 1883 { "-execute", "--execute", 0, 1 },
1884 { "-find-file", "--find-file", 0, 1 }, 1884 { "-find-file", "--find-file", 0, 1 },