emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

nit: minor reformatting, comment revision, & sharpquoting

Browse source
This commit is contained in:
Henrik Lissner 2022-07-29 12:22:33 +02:00
parent 35a89bdfa6
commit 7d93feb98c
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
2 changed files with 12 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

4
core/core-lib.el
View file

@ -407,8 +407,8 @@ COMMAND. This macro is meant to be used as a target for keybinds (e.g. with
`(lambda (arg &rest _) (interactive "P") `(lambda (arg &rest _) (interactive "P")
(let ((current-prefix-arg (or ,prefix-arg arg))) (let ((current-prefix-arg (or ,prefix-arg arg)))
(,(if args (,(if args
'funcall-interactively #'funcall-interactively
'call-interactively) #'call-interactively)
,command ,@args)))) ,command ,@args))))
(defmacro cmds! (&rest branches) (defmacro cmds! (&rest branches)

20
core/core.el
View file

@ -305,7 +305,7 @@ users).")
;; ;;
;;; Don't litter `doom-emacs-dir' ;;; Don't litter `doom-emacs-dir'/$HOME
;; I change `user-emacs-directory' because many packages (even built-in ones) ;; I change `user-emacs-directory' because many packages (even built-in ones)
;; abuse it to build paths for storage/cache files (instead of correctly using ;; abuse it to build paths for storage/cache files (instead of correctly using
@ -329,6 +329,12 @@ users).")
;; config (e.g. ~/.doom.d/). ;; config (e.g. ~/.doom.d/).
(setq custom-file (expand-file-name "custom.el" doom-private-dir)) (setq custom-file (expand-file-name "custom.el" doom-private-dir))
;; By default, Emacs stores `authinfo' in $HOME and in plain-text. Let's not do
;; that, mkay? This file stores usernames, passwords, and other treasures for
;; the aspiring malicious third party. You'll need a GPG setup though.
(setq auth-sources (list (concat doom-etc-dir "authinfo.gpg")
"~/.authinfo.gpg"))
(define-advice en/disable-command (:around (fn &rest args) write-to-data-dir) (define-advice en/disable-command (:around (fn &rest args) write-to-data-dir)
"Write saved safe-local-variables to `custom-file' instead. "Write saved safe-local-variables to `custom-file' instead.
@ -470,15 +476,9 @@ Otherwise, `en/disable-command' (in novice.el.gz) is hardcoded to write them to
(setq debug-on-error init-file-debug (setq debug-on-error init-file-debug
jka-compr-verbose init-file-debug) jka-compr-verbose init-file-debug)
;; Emacs stores `authinfo' in $HOME and in plain-text. Let's not do that, mkay? ;; Get rid of "For information about GNU Emacs..." message at startup. It's
;; This file stores usernames, passwords, and other treasures for the aspiring ;; redundant with our dashboard. However, in daemon sessions it says "Starting
;; malicious third party. However, for this to work you need a GPG setup. ;; Emacs daemon." instead, which is fine.
(setq auth-sources (list (concat doom-etc-dir "authinfo.gpg")
"~/.authinfo.gpg"))
;; Get rid of "For information about GNU Emacs..." message at startup, unless
;; we're in a daemon session where it'll say "Starting Emacs daemon." instead,
;; which isn't so bad.
(unless (daemonp) (unless (daemonp)
(advice-add #'display-startup-echo-area-message :override #'ignore)) (advice-add #'display-startup-echo-area-message :override #'ignore))