[elpa] master 4646d35 078/173: Allow advising company-dabbrev(-code)? regex generation

[Dmitry Gutov]

branch: master
commit 4646d35eb9191650665a723e80be6a7c19acb242
Author: PythonNut <address@hidden>
Commit: PythonNut <address@hidden>

    Allow advising company-dabbrev(-code)? regex generation
---
 company-dabbrev-code.el |    2 +-
 company-dabbrev.el      |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/company-dabbrev-code.el b/company-dabbrev-code.el
index dcfe6ab..cbe8d3f 100644
--- a/company-dabbrev-code.el
+++ b/company-dabbrev-code.el
@@ -69,7 +69,7 @@ also `company-dabbrev-code-time-limit'."
   "Non-nil to ignore case when collecting completion candidates."
   :type 'boolean)
 
-(defsubst company-dabbrev-code--make-regexp (prefix)
+(defun company-dabbrev-code--make-regexp (prefix)
   (concat "\\_<" (if (equal prefix "")
                      "\\([a-zA-Z]\\|\\s_\\)"
                    (regexp-quote prefix))
diff --git a/company-dabbrev.el b/company-dabbrev.el
index 6f90c16..ab53251 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))