fixing let in gtags annotation

[gnu-emacs-elpa] / company-gtags.el

diff --git a/company-gtags.el b/company-gtags.el
index 41a81726287a4ee0fd3c2aec18cf9938287ab2f9..d3a5421bb26330e241bef4e90751c8e99b153968 100644 (file)
--- a/company-gtags.el
+++ b/company-gtags.el
@@ -88,9 +88,9 @@
     (candidates (company-gtags-fetch-tags arg))
     (sorted t)
     (duplicates t)
-    (annotation (let (annotation)
-                  (when (string-match (concat arg "\\((.*)\\).*") (get-text-property 0 'meta arg))
-                    (match-string 1 (get-text-property 0 'meta arg)))))
+    (annotation (let ((meta (get-text-property 0 'meta arg)))
+                  (when (string-match (concat arg "\\((.*)\\).*") meta)
+                    (match-string 1 meta))))
     (meta (get-text-property 0 'meta arg))
     (location (get-text-property 0 'location arg))))