Fix git snafu partially

This commit is contained in:
Gerard Vermeulen 2023-12-11 08:38:43 +01:00
parent 58b440ddc7
commit c3b30bee89
1 changed files with 37 additions and 1 deletions

View File

@ -382,6 +382,9 @@ recommendation of [[info:emacs#Saving Customizations][saving customizations (inf
:CUSTOM_ID: sec:desktop
:END:
The [[info:emacs#Saving Emacs Sessions][desktop]] library allows to save the state of Emacs from closing a session to
opening a session.
#+caption[Setup ~desktop~ to save Emacs sessions]:
#+caption: Setup ~desktop~ to save Emacs sessions.
#+begin_src emacs-lisp -n
@ -394,7 +397,7 @@ recommendation of [[info:emacs#Saving Customizations][saving customizations (inf
;; Exclude the exclusions from desktop.el.
(seq bos "/" (zero-or-more (not (any "/:"))) ":")
(seq "(ftp)" eos)
;; Exclude all (hence, also compiled) Emacs Lisp files:
;; Exclude all (hence, all ob-<lang>.el) Emacs Lisp files:
(seq ".el" eos)))))
#+end_src
@ -835,6 +838,39 @@ to claims in [[info:consult#Top][consult (info)]]).
(setf bookmark-exit-hook 'bookmark-unload-function))
#+end_src
[[info:emacs#Registers][Registers (info)]]
:PROPERTIES:
:CUSTOM_ID: sec:registers
:END:
Listing [[lst:setup-register][setup register usage]] sets up relevant register options.
#+caption[Setup register usage]:
#+caption: Setup register usage.
#+name: lst:setup-register
#+begin_src emacs-lisp -n
(with-eval-after-load 'register
;; BUG: (setopt register-separator "\n") warns non-matching type.
;; * lisp/register.el (register-separator): add string type to
;; choice options and clarify documentation.
;; * doc/emacs/regs.texi (Text Registers): fix example setting
;; 'register-separator'.
(defcustom register-separator nil
"Separator between texts collected in registers, or nil if none.
When collecting text with \\[append-to-register] (or \\[prepend-to-register]),
the separator is added to the beginning (or end, respectively) of the marked
text."
:group 'register
:type '(choice (const :tag "None" nil)
(character :tag "Use register" :value ?+)
(string :tag "Use string" :value "")))
(setopt register-separator "\n"
register-use-preview 'never))
#+end_src
* [[info:emacs#Dired][Dired: directory editor as file manager (info)]]
:PROPERTIES:
:CUSTOM_ID: sec:file-manager