X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/7afffbc99040f50b032713276936511deaaf0568..4646d35eb9191650665a723e80be6a7c19acb242:/company-dabbrev.el diff --git a/company-dabbrev.el b/company-dabbrev.el index 6f90c16a9..ab532516a 100644 --- a/company-dabbrev.el +++ b/company-dabbrev.el @@ -91,7 +91,7 @@ This variable affects both `company-dabbrev' and `company-dabbrev-code'." (> (float-time (time-since ,start)) ,limit) (throw 'done 'company-time-out)))))) -(defsubst company-dabbrev--make-regexp (prefix) +(defun company-dabbrev--make-regexp (prefix) (concat "\\<" (if (equal prefix "") company-dabbrev-char-regexp (regexp-quote prefix))