summaryrefslogtreecommitdiff
path: root/lisp/add-log.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2005-05-18 10:17:18 +0000
committerJuanma Barranquero <lekktu@gmail.com>2005-05-18 10:17:18 +0000
commit3981e5b5f52b39554131132e5e3a428d8508f546 (patch)
tree5885a5b2ece5c94d20a4b52593bcc122ba309489 /lisp/add-log.el
parent9432a9de8f1bafad600e330095bd20f2a9113e34 (diff)
downloademacs-3981e5b5f52b39554131132e5e3a428d8508f546.tar.gz
Replace `read-input' by `read-string'.
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r--lisp/add-log.el4
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)))