mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Fix unintern calls (missing second argument)
This commit is contained in:
@ -22,7 +22,7 @@ Examples:
|
||||
(fn (intern (format "+company|init-%s" mode))))
|
||||
(cond ((null (car-safe backends))
|
||||
(remove-hook hook fn)
|
||||
(unintern fn))
|
||||
(unintern fn nil))
|
||||
((fset fn
|
||||
(lambda ()
|
||||
(when (or (eq major-mode mode)
|
||||
|
@ -18,7 +18,7 @@ Used by `+lookup/in-docsets' and `+lookup/documentation'."
|
||||
(hook (intern (format "%s-hook" mode))))
|
||||
(cond ((null (car-safe docsets))
|
||||
(remove-hook hook fn)
|
||||
(unintern fn))
|
||||
(unintern fn nil))
|
||||
((fset fn
|
||||
(lambda ()
|
||||
(let ((var-sym (if (featurep! :completion ivy)
|
||||
|
@ -34,7 +34,7 @@ properties:
|
||||
(fn (intern (format "+lookup|init-%s" mode))))
|
||||
(cond ((null (car plist))
|
||||
(remove-hook hook fn)
|
||||
(unintern fn))
|
||||
(unintern fn nil))
|
||||
((fset fn
|
||||
(lambda ()
|
||||
(when (or (eq major-mode mode)
|
||||
|
@ -325,7 +325,7 @@ Pretty symbols can be unset for emacs-lisp-mode with:
|
||||
(fn (intern (format "+pretty-code|init-%s" mode))))
|
||||
(cond ((null (car-safe plist))
|
||||
(remove-hook hook fn)
|
||||
(unintern fn))
|
||||
(unintern fn nil))
|
||||
((or (eq +pretty-code-enabled-modes 't)
|
||||
(if (eq (car +pretty-code-enabled-modes) 'not)
|
||||
(not (memq mode (cdr +pretty-code-enabled-modes)))
|
||||
|
Reference in New Issue
Block a user