From 051f98305e9d58373af32ed21137ae5a2a2ac48f Mon Sep 17 00:00:00 2001 From: =?utf8?q?Pavel=20Jan=C3=ADk?= Date: Mon, 26 Nov 2001 16:22:21 +0000 Subject: [PATCH] (strokes-prompt-user-save-strokes): Use insert instead of insert-string. --- lisp/strokes.el | 6 +++--- 1 file 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) -- 2.39.5