From cc39c00a020c486ed0acb1e064b2d9febcdfcd72 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 1 Feb 1997 02:19:14 +0000 Subject: [PATCH] (set-fill-column): Print the old value too. --- lisp/simple.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index 3ab47f443cb..e12c520e5ca 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2494,13 +2494,14 @@ for `auto-fill-function' when turning Auto Fill mode on." Just \\[universal-argument] as argument means to use the current column." (interactive "P") (cond ((integerp arg) + (message "Fill column set to %d (was %d)" arg fill-column) (setq fill-column arg)) ((consp arg) + (message "Fill column set to %d (was %d)" arg fill-column) (setq fill-column (current-column))) ;; Disallow missing argument; it's probably a typo for C-x C-f. (t - (error "set-fill-column requires an explicit argument"))) - (message "fill-column set to %d" fill-column)) + (error "set-fill-column requires an explicit argument")))) (defvar comment-multi-line nil "*Non-nil means \\[indent-new-comment-line] should continue same comment -- 2.39.5