diff options
Diffstat (limited to 'lisp/play/animate.el')
-rw-r--r-- | lisp/play/animate.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/play/animate.el b/lisp/play/animate.el index 662adf119b7..47f08a8b098 100644 --- a/lisp/play/animate.el +++ b/lisp/play/animate.el @@ -156,7 +156,7 @@ Strings will be separated from each other by SPACE lines." (defun animate-birthday-present (&optional name) "Display one's birthday present in a new buffer. You can specify the one's name by NAME; the default value is \"Sarah\"." - (interactive (list (read-string "Name (default \"Sarah\"): " + (interactive (list (read-string "Name (default Sarah): " nil nil "Sarah"))) ;; Make a suitable buffer to display the birthday present in. (switch-to-buffer (get-buffer-create (format "*%s*" name))) |