Append colon and space to the end of prompt

This commit is contained in:
Oscar Fuentes 2010-05-18 19:09:08 +02:00
parent 92c0b771ed
commit 029bf08ea8

View file

@ -1502,7 +1502,7 @@ FUNC should leave point at the end of the modified region"
(setcar (nthcdr 5 item) nil))
((stringp fn)
(setcar (nthcdr 5 item)
(funcall (nth 4 item) (nth 2 item))))
(funcall (nth 4 item) (concat (nth 2 item) ": "))))
(display-help-p
(setq chosen-fn fn)
(throw 'exit 0))