From 7686c7880399718865c83747c63fce3e58b1da1b Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Mon, 20 Apr 2020 02:13:50 +0300 Subject: [PATCH] Add semicolon to prop-line with lisp-data mode (bug#40573). * lisp/bookmark.el (bookmark-insert-file-format-version-stamp): * lisp/saveplace.el (save-place-alist-to-file): Add semicolon to separate 'coding:' and 'mode:'. --- lisp/bookmark.el | 2 +- lisp/saveplace.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/bookmark.el b/lisp/bookmark.el index f2384973e9c..0fa77ed3224 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -736,7 +736,7 @@ CODING is the symbol of the coding-system in which the file is encoded." (insert (format ";;;; Emacs Bookmark Format Version %d\ -;;;; -*- coding: %S mode: lisp-data -*-\n" +;;;; -*- coding: %S; mode: lisp-data -*-\n" bookmark-file-format-version (coding-system-base coding))) (insert ";;; This format is meant to be slightly human-readable;\n" ";;; nevertheless, you probably don't want to edit it.\n" diff --git a/lisp/saveplace.el b/lisp/saveplace.el index f78639db246..73cc8fa6fd7 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el @@ -248,7 +248,7 @@ may have changed) back to `save-place-alist'." (delete-region (point-min) (point-max)) (when save-place-forget-unreadable-files (save-place-forget-unreadable-files)) - (insert (format ";;; -*- coding: %s mode: lisp-data -*-\n" + (insert (format ";;; -*- coding: %s; mode: lisp-data -*-\n" (symbol-name coding-system-for-write))) (let ((print-length nil) (print-level nil)) -- 2.39.2