master 2f80d8058b: Improve the set-fill-column prompt

[Lars Ingebrigtsen]

branch: master
commit 2f80d8058bada74ae67546e95c314066d697b7ba
Author: Antoine Levitt <antoine.levitt@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Improve the set-fill-column prompt
    
    * lisp/simple.el (set-fill-column): Improve the prompt (bug#53874).
---
 lisp/simple.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/simple.el b/lisp/simple.el
index 3cf3024184..af51c99b28 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -8303,7 +8303,8 @@ Just \\[universal-argument] as argument means to use the 
current column."
              ;; We used to use current-column silently, but C-x f is too easily
              ;; typed as a typo for C-x C-f, so we turned it into an error and
              ;; now an interactive prompt.
-             (read-number "Set fill-column to: " (current-column)))))
+             (read-number (format "Change fill-column from %s to: " 
fill-column)
+                          (current-column)))))
   (if (consp arg)
       (setq arg (current-column)))
   (if (not (integerp arg))