diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-04 16:16:23 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-04-04 16:16:23 +0000 |
| commit | 7c3733579278b666bb56b3dc48c6d50d4cdd86c3 (patch) | |
| tree | 58cb946ace2f779e695892393640d7a0a7d1ab18 /lisp/simple.el | |
| parent | d0bfec76e4e3a4cc26742da409e0393733d7d079 (diff) | |
| download | emacs-7c3733579278b666bb56b3dc48c6d50d4cdd86c3.tar.gz | |
(set-fill-column): Prompt rather than error by default.
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 4b5893eeb9f..9135ad50218 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4697,7 +4697,12 @@ for `auto-fill-function' when turning Auto Fill mode on." "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)) |