diff options
Diffstat (limited to 'lisp/net/eudcb-mailabbrev.el')
| -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 ", ")) |