Mercurial > emacs
changeset 41570:7456b3a795c4
(strokes-prompt-user-save-strokes): Use insert instead of insert-string.
| author | Pavel Janík <Pavel@Janik.cz> |
|---|---|
| date | Mon, 26 Nov 2001 16:22:21 +0000 |
| parents | f403516f2134 |
| children | 2902b21d2034 |
| files | lisp/strokes.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/strokes.el Mon Nov 26 16:21:40 2001 +0000 +++ b/lisp/strokes.el Mon Nov 26 16:22:21 2001 +0000 @@ -1295,13 +1295,13 @@ (erase-buffer) (emacs-lisp-mode) (goto-char (point-min)) - (insert-string + (insert ";; -*- Syntax: Emacs-Lisp; Mode: emacs-lisp -*-\n") - (insert-string (format ";;; saved strokes for %s, as of %s\n\n" + (insert (format ";;; saved strokes for %s, as of %s\n\n" (user-full-name) (format-time-string "%B %e, %Y" nil))) (message "Saving strokes in %s..." strokes-file) - (insert-string (format "(setq strokes-global-map '%s)" + (insert (format "(setq strokes-global-map '%s)" (pp current))) (message "Saving strokes in %s..." strokes-file) (indent-region (point-min) (point-max) nil)