ui/pretty-code: don't error on non-existent symbol
Users may want to customize the symbol list entirely, rather than modify in place.
This commit is contained in:
parent
05160a6526
commit
aaa21698e9
1 changed files with 2 additions and 5 deletions
|
@ -99,11 +99,8 @@ Pretty symbols can be unset for emacs-lisp-mode with:
|
||||||
(:merge (setq merge (pop rest)))
|
(:merge (setq merge (pop rest)))
|
||||||
(:alist (setq results (append (pop rest) results)))
|
(:alist (setq results (append (pop rest) results)))
|
||||||
(_
|
(_
|
||||||
(unless (plist-member +pretty-code-symbols key)
|
(when-let* ((char (plist-get +pretty-code-symbols key)))
|
||||||
(user-error "Invalid keyword in set-pretty-symbols!: %s" key))
|
(push (cons (pop rest) char) results)))))
|
||||||
(let* ((sym (pop rest))
|
|
||||||
(char (plist-get +pretty-code-symbols key)))
|
|
||||||
(push (cons sym char) results)))))
|
|
||||||
(unless merge
|
(unless merge
|
||||||
(delq (assq mode +pretty-code-symbols-alist)
|
(delq (assq mode +pretty-code-symbols-alist)
|
||||||
+pretty-code-symbols-alist))
|
+pretty-code-symbols-alist))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue