changeset 11634:820eaef29fae

(main): Delete duplicate code for -version. (standard_args): Add -help and -version.
author Richard M. Stallman <rms@gnu.org>
date Sun, 30 Apr 1995 23:50:15 +0000
parents e068b3b7b232
children b56f6afa16ec
files src/emacs.c
diffstat 1 files changed, 2 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/src/emacs.c	Sun Apr 30 23:37:26 1995 +0000
+++ b/src/emacs.c	Sun Apr 30 23:50:15 1995 +0000
@@ -927,16 +927,6 @@
   tzset ();
 #endif /* defined (sun) || defined (LOCALTIME_CACHE) */
 
-  /* Handle the GNU standard option --version.  */
-  if (argmatch (argv, argc, "-version", "--version", 3, NULL, &skip_args))
-    {
-      Lisp_Object ver;
-      ver = call0 (intern ("emacs-version"));
-      if (STRINGP (ver))
-	printf ("%s\n", XSTRING (ver)->data);
-      exit (0);
-    }
-
   /* Enter editor command loop.  This never returns.  */
   Frecursive_edit ();
   /* NOTREACHED */
@@ -957,6 +947,8 @@
 
 struct standard_args standard_args[] =
 {
+  { "-version", "--version", 110, 0 },
+  { "-help", "--help", 110, 0 },
   { "-nl", "--no-shared-memory", 100, 0 },
 #ifdef VMS
   { "-map", "--map-data", 100, 0 },