Add "multi-tty" to emacs-version output.
authorKaroly Lorentey <lorentey@elte.hu>
Sat, 3 Jan 2004 16:51:56 +0000 (16:51 +0000)
committerKaroly Lorentey <lorentey@elte.hu>
Sat, 3 Jan 2004 16:51:56 +0000 (16:51 +0000)
lisp/version.el (emacs-version): Add multi-tty to output if (featurep
'multi-tty).  Suggested by Romain Francoise <romain@orebokech.com>.

git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-41

lisp/version.el

index 42dbb3f..6c99d8d 100644 (file)
@@ -55,8 +55,8 @@ to the system configuration; look at `system-configuration' instead."
   (interactive "P")
   (let ((version-string
          (format (if (not (interactive-p))
-                    "GNU Emacs %s (%s%s%s)\n of %s on %s"
-                  "GNU Emacs %s (%s%s%s) of %s on %s")
+                    "GNU Emacs %s (%s%s%s%s)\n of %s on %s"
+                  "GNU Emacs %s (%s%s%s%s) of %s on %s")
                  emacs-version
                 system-configuration
                 (cond ((featurep 'motif)
@@ -70,6 +70,7 @@ to the system configuration; look at `system-configuration' instead."
                     (format ", %s scroll bars"
                             (capitalize (symbol-name x-toolkit-scroll-bars)))
                   "")
+                (if (featurep 'multi-tty) ", multi-tty" "")
                 (format-time-string "%Y-%m-%d" emacs-build-time)
                  emacs-build-system)))
     (if here