diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2005-05-18 10:17:18 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2005-05-18 10:17:18 +0000 |
commit | 3981e5b5f52b39554131132e5e3a428d8508f546 (patch) | |
tree | 5885a5b2ece5c94d20a4b52593bcc122ba309489 /lisp/add-log.el | |
parent | 9432a9de8f1bafad600e330095bd20f2a9113e34 (diff) | |
download | emacs-3981e5b5f52b39554131132e5e3a428d8508f546.tar.gz |
Replace `read-input' by `read-string'.
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r-- | lisp/add-log.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el index 7c5f8462f77..6dcbfca0c26 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -492,13 +492,13 @@ non-nil, otherwise in local time." (if whoami (progn - (setq full-name (read-input "Full name: " full-name)) + (setq full-name (read-string "Full name: " full-name)) ;; Note that some sites have room and phone number fields in ;; full name which look silly when inserted. Rather than do ;; anything about that here, let user give prefix argument so that ;; s/he can edit the full name field in prompter if s/he wants. (setq mailing-address - (read-input "Mailing address: " mailing-address)))) + (read-string "Mailing address: " mailing-address)))) (unless (equal file-name buffer-file-name) (if (or other-window (window-dedicated-p (selected-window))) |