diff options
| -rw-r--r-- | lisp/subr.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index db69a3f6f5b..fac2398a795 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -1719,6 +1719,9 @@ by doing (clear-string STRING)." | |||
| 1719 | 1719 | ||
| 1720 | ;; This should be used by `call-interactively' for `n' specs. | 1720 | ;; This should be used by `call-interactively' for `n' specs. |
| 1721 | (defun read-number (prompt &optional default) | 1721 | (defun read-number (prompt &optional default) |
| 1722 | "Read a numeric value in the minibuffer, prompting with PROMPT. | ||
| 1723 | DEFAULT specifies a default value to return if the user just types RET. | ||
| 1724 | The value of DEFAULT is inserted into PROMPT." | ||
| 1722 | (let ((n nil)) | 1725 | (let ((n nil)) |
| 1723 | (when default | 1726 | (when default |
| 1724 | (setq prompt | 1727 | (setq prompt |