From a84a9faad450978ba6c0cc18163f629267f5cd06 Mon Sep 17 00:00:00 2001
From: Sean Whitton <spwhitton@spwhitton.name>
Date: Sat, 27 Apr 2024 10:33:58 +0100
Subject: change some more customisation system comments to Lisp comments

---
 .emacs.d/init.el | 50 ++++++++++++++++++++++++++++++++++++++------------
 1 file changed, 38 insertions(+), 12 deletions(-)

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index c5737330..d470e06f 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -239,8 +239,14 @@ two 80-column windows side-by-side in the frame."
 
  '(minibuffer-follows-selected-frame nil)
  '(mode-line-compact 'long)
- '(mouse-drag-copy-region t nil nil "X primary selection-like behaviour within Emacs even when not available outside.")
- '(mouse-highlight 1 nil nil "See `make-pointer-invisible'.")
+
+ ;; X primary selection-like behaviour within Emacs even when not available
+ ;; outside.
+ '(mouse-drag-copy-region t)
+
+ ;; See `make-pointer-invisible'.
+ '(mouse-highlight 1)
+
  '(mouse-yank-at-point t)
  '(native-comp-async-jobs-number 1)
  '(native-comp-async-report-warnings-errors 'silent)
@@ -255,30 +261,47 @@ two 80-column windows side-by-side in the frame."
  '(remember-notes-buffer-name "*scratch*")
  '(remote-file-name-inhibit-delete-by-moving-to-trash t)
  '(require-final-newline t)
- '(save-interprogram-paste-before-kill nil nil nil "See <https://debbugs.gnu.org/53728>.")
- '(save-place-mode t nil nil "If quitting Emacs is slow, set `save-place-forget-unreadable-files' to nil.")
+
+ ;; See <https://debbugs.gnu.org/53728>.
+ '(save-interprogram-paste-before-kill nil)
+
+ ;; If quitting Emacs is slow set `save-place-forget-unreadable-files' to nil.
+ '(save-place-mode t)
+
  '(savehist-additional-variables '(compile-history log-edit-comment-ring))
  '(savehist-mode t)
  '(select-active-regions 'only)
  '(select-enable-primary t)
  '(send-mail-function 'sendmail-send-it)
  '(shell-command-prompt-show-cwd t)
- '(show-paren-when-point-in-periphery t nil nil "Useful for C-M-d.")
+
+ ;; Useful for C-M-d.
+ '(show-paren-when-point-in-periphery t)
+
  '(shr-max-width 78)
  '(slime-load-failed-fasl 'never)
  '(tab-bar-history-mode t)
  '(tab-bar-show 1)
  '(text-mode-ispell-word-completion nil)
- '(tramp-auto-save-directory "~/.emacs.d/auto-saves/" nil nil "Put TRAMP auto-saves under local `user-emacs-directory'.")
- '(tramp-backup-directory-alist '(("." . "~/.emacs.d/backups/")) nil nil "Put TRAMP backups under remote ~/.emacs.d/.")
+
+ ;; Put TRAMP auto-saves under local `user-emacs-directory'.
+ '(tramp-auto-save-directory "~/.emacs.d/auto-saves/")
+ ;; Put TRAMP backups under remote ~/.emacs.d/.
+ '(tramp-backup-directory-alist '(("." . "~/.emacs.d/backups/")))
+
  '(tramp-copy-size-limit nil)
  '(tramp-default-method "rsync")
- '(tramp-use-connection-share nil nil nil "Rely on my ~/.ssh/config.")
- '(tramp-verbose 1 nil nil "Manual says this should improve performance.")
+
+ ;; Rely on my ~/.ssh/config.
+ '(tramp-use-connection-share nil)
+
+ ;; Manual says this should improve performance.
+ '(tramp-verbose 1)
+
  '(transient-cycles-buffer-siblings-mode t)
  '(transient-cycles-tab-bar-mode t)
- '(transient-cycles-window-buffers-cycle-backwards-key [134217777] nil nil "M-1.")
- '(transient-cycles-window-buffers-cycle-forwards-key [134217780] nil nil "M-4.")
+ '(transient-cycles-window-buffers-cycle-backwards-key [134217777]) ; M-1
+ '(transient-cycles-window-buffers-cycle-forwards-key [134217780])  ; M-4
  '(transient-cycles-window-buffers-mode t)
  '(uniquify-buffer-name-style 'forward nil (uniquify))
  '(use-short-answers t)
@@ -4833,7 +4856,10 @@ before uploading to NEW again." \n \n
  '(org-list-use-circular-motion t)
  '(org-log-done 'time)
  '(org-log-into-drawer t)
- '(org-log-repeat nil nil nil "Cluttering, and information probably in git.")
+
+ ;; Cluttering, and information probably in git.
+ '(org-log-repeat nil)
+
  '(org-log-states-order-reversed nil)
 
  ;; Desirable with `icomplete-mode'.
-- 
cgit v1.2.3