diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 12:29:42 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 12:29:42 +0000 |
| commit | f1180544bb5ff44cdb45b8734734294b0a2fa7a4 (patch) | |
| tree | 626b0db999b924834efc1f437eb47776ea6bd797 /lisp/version.el | |
| parent | 37d1e6800ca66b7977ebafb51ddb31a9de077e15 (diff) | |
| download | emacs-f1180544bb5ff44cdb45b8734734294b0a2fa7a4.tar.gz | |
Trailing whitespace deleted.
Diffstat (limited to 'lisp/version.el')
| -rw-r--r-- | lisp/version.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/version.el b/lisp/version.el index e5c1017a659..ff90d1fd1e8 100644 --- a/lisp/version.el +++ b/lisp/version.el @@ -53,13 +53,13 @@ If optional argument HERE is non-nil, insert string at point. Don't use this function in programs to choose actions according to the system configuration; look at `system-configuration' instead." (interactive "P") - (let ((version-string + (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") emacs-version system-configuration - (cond ((featurep 'motif) + (cond ((featurep 'motif) (concat ", " (substring motif-version-string 4))) ((featurep 'x-toolkit) ", X toolkit") (t "")) @@ -70,7 +70,7 @@ to the system configuration; look at `system-configuration' instead." "") (format-time-string "%Y-%m-%d" emacs-build-time) emacs-build-system))) - (if here + (if here (insert version-string) (if (interactive-p) (message "%s" version-string) |