cl-pushnew => push
Now that doom//byte-compile and doom//reload-autoloads always run in an isolated Emacs session, there is little need to ensure idempotency of the current session's state.
This commit is contained in:
parent
79cf78d1c6
commit
a24e22cf57
5 changed files with 12 additions and 13 deletions
|
@ -28,8 +28,8 @@
|
|||
(make-directory elfeed-db-directory t)
|
||||
|
||||
;; Ensure elfeed buffers are treated as real
|
||||
(cl-pushnew (lambda (buf) (string-match-p "^\\*elfeed" (buffer-name buf)))
|
||||
doom-real-buffer-functions)
|
||||
(push (lambda (buf) (string-match-p "^\\*elfeed" (buffer-name buf)))
|
||||
doom-real-buffer-functions)
|
||||
|
||||
;; Enhance readability of a post
|
||||
(add-hook 'elfeed-show-mode-hook #'+rss|elfeed-wrap)
|
||||
|
|
|
@ -209,13 +209,12 @@ across windows."
|
|||
(cons (format "(%s " (or (read-string "(") "")) ")"))
|
||||
|
||||
;; Add escaped-sequence support to embrace
|
||||
(cl-pushnew (cons ?\\ (make-embrace-pair-struct
|
||||
:key ?\\
|
||||
:read-function #'+evil--embrace-escaped
|
||||
:left-regexp "\\[[{(]"
|
||||
:right-regexp "\\[]})]"))
|
||||
(default-value 'embrace--pairs-list)
|
||||
:key #'car)
|
||||
(push (cons ?\\ (make-embrace-pair-struct
|
||||
:key ?\\
|
||||
:read-function #'+evil--embrace-escaped
|
||||
:left-regexp "\\[[{(]"
|
||||
:right-regexp "\\[]})]"))
|
||||
(default-value 'embrace--pairs-list))
|
||||
|
||||
;; Add extra pairs
|
||||
(add-hook 'LaTeX-mode-hook #'embrace-LaTeX-mode-hook)
|
||||
|
@ -238,7 +237,7 @@ across windows."
|
|||
(add-hook 'doom-post-init-hook #'evil-escape-mode)
|
||||
:config
|
||||
;; no `evil-escape' in minibuffer
|
||||
(cl-pushnew #'minibufferp evil-escape-inhibit-functions :test #'eq)
|
||||
(push #'minibufferp evil-escape-inhibit-functions)
|
||||
(map! :irvo "C-g" #'evil-escape))
|
||||
|
||||
|
||||
|
|
|
@ -8,7 +8,7 @@
|
|||
(add-hook 'swift-mode-hook #'flycheck-mode)
|
||||
:config
|
||||
(set! :repl 'swift-mode #'swift-mode-run-repl) ; TODO test this
|
||||
(cl-pushnew 'swift flycheck-checkers))
|
||||
(push 'swift flycheck-checkers))
|
||||
|
||||
|
||||
(def-package! company-sourcekit
|
||||
|
|
|
@ -216,7 +216,7 @@ between the two."
|
|||
(defun +org-hacks ()
|
||||
"Getting org to behave."
|
||||
;; Don't open separate windows
|
||||
(cl-pushnew '(file . find-file) org-link-frame-setup)
|
||||
(push '(file . find-file) org-link-frame-setup)
|
||||
|
||||
;; Let OS decide what to do with files when opened
|
||||
(setq org-file-apps
|
||||
|
|
|
@ -16,7 +16,7 @@
|
|||
(backward-word)
|
||||
(looking-at-p
|
||||
(concat "\\<" (regexp-opt doom-electric-indent-words))))))
|
||||
(cl-pushnew #'+electric-indent|char electric-indent-functions :test #'eq)
|
||||
(push #'+electric-indent|char electric-indent-functions)
|
||||
|
||||
(def-setting! :electric (modes &rest plist)
|
||||
"Declare :words (list of strings) or :chars (lists of chars) in MODES that
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue