; Normalize spacing in last change

This commit is contained in:
Sean Whitton 2025-04-11 10:01:31 +08:00
parent c0ea954d0f
commit 37164032f6
5 changed files with 5 additions and 5 deletions

View file

@ -271,7 +271,7 @@ abbrevs have been saved."
(when (unencodable-char-position (point-min) (point-max) 'utf-8)
(setq coding-system-for-write 'utf-8-emacs))
(goto-char (point-min))
(insert (format ";;-*-coding: %S; lexical-binding:t -*-\n"
(insert (format ";; -*- coding: %S; lexical-binding: t -*-\n"
coding-system-for-write))
(write-region nil nil file nil (and (not verbose) 0)))))

View file

@ -2336,7 +2336,7 @@ fileset thinks this is necessary or not."
(delete-file filesets-menu-cache-file))
;;(message "Filesets: saving menu cache")
(with-temp-buffer
(insert ";; -*- mode: emacs-lisp; lexical-binding:t -*-\n")
(insert ";; -*- mode: emacs-lisp; lexical-binding: t -*-\n")
(dolist (this filesets-menu-cache-contents)
(if (get this 'custom-type)
(progn

View file

@ -1318,7 +1318,7 @@ Optional argument N must be a valid digit number. It defaults to 1.
(defconst recentf-save-file-header
;; FIXME: This should arguably be a `lisp-data' file, but currently
;; it contains and is used as an executable ELisp code.
";;; Automatically generated by `recentf' on %s -*- mode: emacs-lisp; lexical-binding:t -*-\n"
";;; Automatically generated by `recentf' on %s -*- mode: emacs-lisp; lexical-binding: t -*-\n"
"Header to be written into the `recentf-save-file'.")
(defconst recentf-save-file-coding-system

View file

@ -244,7 +244,7 @@ If AUTO-SAVE is non-nil, compare the saved contents to the one last saved,
(insert
(format-message
(concat
";; -*- mode: emacs-lisp; lexical-binding:t; coding: %s -*-\n"
";; -*- mode: emacs-lisp; lexical-binding: t; coding: %s -*-\n"
";; Minibuffer history file, automatically generated by `savehist'.\n"
"\n")
savehist-coding-system))

View file

@ -150,7 +150,7 @@ i.e. 1970-1-1) are loaded as expiring one year from now instead."
(url-cookie-clean-up)
(url-cookie-clean-up t)
(with-temp-buffer
(insert ";; Emacs-W3 HTTP cookies file -*- lexical-binding:t -*-\n"
(insert ";; Emacs-W3 HTTP cookies file -*- lexical-binding: t -*-\n"
";; Automatically generated file!!! DO NOT EDIT!!!\n\n"
"(setq url-cookie-storage\n '")
(let ((print-length nil) (print-level nil))