aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaroly Lorentey2004-01-03 16:51:56 +0000
committerKaroly Lorentey2004-01-03 16:51:56 +0000
commitf0e2c284732f28a4ab09fbc8a7eaeebc81f72d18 (patch)
tree1c41b72bf6b59716c10d5e2a5717dd462a270ca1
parentfa013bcef8a23770cec7a4bc0c5bfae665242399 (diff)
downloademacs-f0e2c284732f28a4ab09fbc8a7eaeebc81f72d18.tar.gz
emacs-f0e2c284732f28a4ab09fbc8a7eaeebc81f72d18.zip
Add "multi-tty" to emacs-version output.
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
-rw-r--r--lisp/version.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/version.el b/lisp/version.el
index 42dbb3f9c25..6c99d8de1d6 100644
--- a/lisp/version.el
+++ b/lisp/version.el
@@ -55,8 +55,8 @@ to the system configuration; look at `system-configuration' instead."
55 (interactive "P") 55 (interactive "P")
56 (let ((version-string 56 (let ((version-string
57 (format (if (not (interactive-p)) 57 (format (if (not (interactive-p))
58 "GNU Emacs %s (%s%s%s)\n of %s on %s" 58 "GNU Emacs %s (%s%s%s%s)\n of %s on %s"
59 "GNU Emacs %s (%s%s%s) of %s on %s") 59 "GNU Emacs %s (%s%s%s%s) of %s on %s")
60 emacs-version 60 emacs-version
61 system-configuration 61 system-configuration
62 (cond ((featurep 'motif) 62 (cond ((featurep 'motif)
@@ -70,6 +70,7 @@ to the system configuration; look at `system-configuration' instead."
70 (format ", %s scroll bars" 70 (format ", %s scroll bars"
71 (capitalize (symbol-name x-toolkit-scroll-bars))) 71 (capitalize (symbol-name x-toolkit-scroll-bars)))
72 "") 72 "")
73 (if (featurep 'multi-tty) ", multi-tty" "")
73 (format-time-string "%Y-%m-%d" emacs-build-time) 74 (format-time-string "%Y-%m-%d" emacs-build-time)
74 emacs-build-system))) 75 emacs-build-system)))
75 (if here 76 (if here