[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ab41b1c 1/3: Fill Emacs version on about screen
From: |
Lars Ingebrigtsen |
Subject: |
master ab41b1c 1/3: Fill Emacs version on about screen |
Date: |
Sat, 4 Dec 2021 20:13:48 -0500 (EST) |
branch: master
commit ab41b1c5541cd0b1a72b1f0358dcbb0c2f60dc3b
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fill Emacs version on about screen
* lisp/startup.el (fancy-about-text): Fill the Emacs version,
since it's too long these days.
---
lisp/startup.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/lisp/startup.el b/lisp/startup.el
index d4bb338..a57ce3d 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1651,7 +1651,11 @@ Each element in the list should be a list of strings or
pairs
" operating system.\n"
:face (variable-pitch font-lock-builtin-face)
"\n"
- ,(lambda () (emacs-version))
+ ,(lambda ()
+ (with-temp-buffer
+ (insert (emacs-version))
+ (fill-region (point-min) (point-max))
+ (buffer-string)))
"\n"
:face (variable-pitch (:height 0.8))
,(lambda () emacs-copyright)