[elpa] master 856c66a 32/40: company-gtags--annotation: Use regexp-quote

[Dmitry Gutov]

branch: master
commit 856c66a16338deb8d30cdae404a2d893518a042c
Author: Dmitry Gutov <address@hidden>
Commit: Dmitry Gutov <address@hidden>

    company-gtags--annotation: Use regexp-quote
    
    To avoid errors on such values of arg as '[]'.
---
 company-gtags.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/company-gtags.el b/company-gtags.el
index 4b04661..302c97b 100644
--- a/company-gtags.el
+++ b/company-gtags.el
@@ -89,7 +89,7 @@ completion."
 
 (defun company-gtags--annotation (arg)
   (let ((meta (get-text-property 0 'meta arg)))
-    (when (string-match (concat arg "\\((.*)\\).*") meta)
+    (when (string-match (concat (regexp-quote arg) "\\((.*)\\).*") meta)
       (match-string 1 meta))))
 
 ;;;###autoload