diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2017-08-20 09:12:14 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2017-08-20 09:12:14 +0200 |
commit | f0c72ee6e5c6570e0327140ed7fe9d2d54a8ad80 (patch) | |
tree | 407a57268a46209bba7ed780f25c9216dd4812b3 /helm-dabbrev.el | |
parent | a42da5dd6283e96aa9c360273b69f035d664a679 (diff) |
Throw error when dabbrev is nil
* helm-dabbrev.el (helm-dabbrev--cache-data): Do it.
Diffstat (limited to 'helm-dabbrev.el')
-rw-r--r-- | helm-dabbrev.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/helm-dabbrev.el b/helm-dabbrev.el index 0f73db99..d070ddbc 100644 --- a/helm-dabbrev.el +++ b/helm-dabbrev.el @@ -233,7 +233,8 @@ but the initial search for all candidates in buffer(s)." (defvar helm-dabbrev--hash (make-hash-table :test 'equal)) (defun helm-dabbrev--cache-data (dabbrev) - (unless (or (null dabbrev) (string= dabbrev "")) + (cl-assert dabbrev nil "[No Match]") + (unless (string= dabbrev "") (or (cl-loop for count downfrom (length dabbrev) to 1 when (gethash (substring-no-properties dabbrev 0 count) helm-dabbrev--hash) |