diff lisp/simple.el @ 93662:3f94f995598c

(set-fill-column): Prompt rather than error by default.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 04 Apr 2008 16:16:23 +0000
parents fbde6ee8b428
children 22a31e3179e0
line wrap: on
line diff
--- a/lisp/simple.el	Fri Apr 04 12:08:14 2008 +0000
+++ b/lisp/simple.el	Fri Apr 04 16:16:23 2008 +0000
@@ -4697,7 +4697,12 @@
   "Set `fill-column' to specified argument.
 Use \\[universal-argument] followed by a number to specify a column.
 Just \\[universal-argument] as argument means to use the current column."
-  (interactive "P")
+  (interactive
+   (list (or current-prefix-arg
+             ;; 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)))))
   (if (consp arg)
       (setq arg (current-column)))
   (if (not (integerp arg))