Emacs-Lisp/read-string - hirono2021 @ ウィキ

Top > Emacs-Lisp > read-string

(setq default-format "%Y/%m/%d %H:%M:%S")
(defvar insert-date-format-history '())
(read-string
                     (format "Format (default %s): " default-format)
                     ""
                     'insert-date-format-history
                     xxx)
"てすと"
 
"x"
(setq xxx "てすと")
"てすと"