Rearrange "setopt-call" blocks to play with `denote'

This commit is contained in:
Gerard Vermeulen 2024-02-01 15:54:51 +01:00
parent b1471c06e8
commit 3733b67a52

View File

@ -269,15 +269,6 @@ recommendation of [[info:emacs#Saving Customizations][saving customizations (inf
#+caption: Set the second set of Emacs options: pin packages to archives.
#+name: lst:2nd-setopt-call
#+begin_src emacs-lisp -n :results silent
(when (eq system-type 'darwin)
(setopt ns-alternate-modifier nil
ns-command-modifier 'meta
ns-right-command-modifier 'super))
(when (eq window-system 'ns)
(add-to-list 'initial-frame-alist '(height . 51))
(add-to-list 'initial-frame-alist '(width . 180)))
(setopt
;; See https://github.com/melpa/melpa#mirrors for official Melpa mirrors.
;; ("melpa" . "https://www.mirrorservice.org/sites/melpa.org/packages/")
@ -294,6 +285,7 @@ recommendation of [[info:emacs#Saving Customizations][saving customizations (inf
(compat . "gnu")
(consult . "gnu")
(dash . "melpa-stable")
(denote . "gnu-devel")
(eldoc . "nongnu")
(embark . "gnu")
(embark-consult . "gnu")
@ -355,6 +347,14 @@ recommendation of [[info:emacs#Saving Customizations][saving customizations (inf
(verilog-mode . "nongnu")
(xref . "nongnu"))
package-pinned-packages :key #'car))
(when (eq system-type 'darwin)
(setopt ns-alternate-modifier nil
ns-command-modifier 'meta
ns-right-command-modifier 'super))
(when (eq window-system 'ns)
(add-to-list 'initial-frame-alist '(height . 51))
(add-to-list 'initial-frame-alist '(width . 180)))
#+end_src
#+caption[Handle ~user-emacs-directory~ site-lisp directories as packages]: