diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-11-26 16:22:21 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-11-26 16:22:21 +0000 |
| commit | 051f98305e9d58373af32ed21137ae5a2a2ac48f (patch) | |
| tree | 495b00b0c30b788828e0017012fb0581e1a4368c /lisp/strokes.el | |
| parent | 4f2436ae0e18dfb00c051c3b6e9e24d408e2369c (diff) | |
| download | emacs-051f98305e9d58373af32ed21137ae5a2a2ac48f.tar.gz | |
(strokes-prompt-user-save-strokes): Use insert instead of insert-string.
Diffstat (limited to 'lisp/strokes.el')
| -rw-r--r-- | lisp/strokes.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/strokes.el b/lisp/strokes.el index 7c9423b3c8f..e3a1f2b3bf4 100644 --- a/lisp/strokes.el +++ b/lisp/strokes.el @@ -1295,13 +1295,13 @@ This is based on the last time the `strokes-window-configuration was updated." (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) |