diff options
| author | Brent Westbrook <bwestbr2@go.olemiss.edu> | 2022-11-19 09:23:57 -0500 |
|---|---|---|
| committer | Thomas Fitzsimmons <fitzsim@fitzsim.org> | 2022-11-19 09:26:55 -0500 |
| commit | db3ff76dc7d3184e51cb7ed17c78ef76babb9032 (patch) | |
| tree | 398f5e1d5e2eab0e417e5a50c754be0e8a47ca1c | |
| parent | 91c3a276dd5cdeb6eab40d921ff2def47500a4c4 (diff) | |
| download | emacs-db3ff76dc7d3184e51cb7ed17c78ef76babb9032.tar.gz | |
EUDC: Fix a void-variable error
* lisp/net/eudcb-mailabbrev.el (eudc-mailabbrev-query-internal):
Check if symbol is bound before taking its value. (Bug#59369)
| -rw-r--r-- | lisp/net/eudcb-mailabbrev.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/net/eudcb-mailabbrev.el b/lisp/net/eudcb-mailabbrev.el index 64b50af09bc..4a2dd9ad4a4 100644 --- a/lisp/net/eudcb-mailabbrev.el +++ b/lisp/net/eudcb-mailabbrev.el @@ -78,7 +78,10 @@ RETURN-ATTRS is a list of attributes to return, defaulting to (dolist (term query) (let* ((attr (car term)) (value (cdr term)) - (raw-matches (symbol-value (intern-soft value mail-abbrevs)))) + (soft (intern-soft value mail-abbrevs)) + (raw-matches (and + (boundp soft) + (symbol-value soft)))) (when (and raw-matches (memq attr '(email firstname name))) (let* ((matches (split-string raw-matches ", ")) |