]> rtime.felk.cvut.cz Git - sojka/company-mode.git/commitdiff
fixing let in gtags annotation
authorksjogo <jogo@kronberger-spiele.de>
Tue, 3 Jun 2014 20:43:37 +0000 (22:43 +0200)
committerksjogo <jogo@kronberger-spiele.de>
Tue, 3 Jun 2014 20:49:20 +0000 (22:49 +0200)
company-gtags.el

index 41a81726287a4ee0fd3c2aec18cf9938287ab2f9..d3a5421bb26330e241bef4e90751c8e99b153968 100644 (file)
@@ -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))))