]> code.delx.au - gnu-emacs-elpa/commitdiff
Try not to prompt for TAGS file.
authorNikolaj Schumacher <git@nschum.de>
Fri, 17 Apr 2009 19:04:38 +0000 (21:04 +0200)
committerNikolaj Schumacher <git@nschum.de>
Sat, 18 Apr 2009 11:06:47 +0000 (13:06 +0200)
company-etags.el

index 321f4f8653527e61d4ef99ffb115f1bf71b71bff..07cd0f5815fa40c2a1e5ae14f0ccf8a1684d2744 100644 (file)
@@ -66,7 +66,9 @@ buffer automatically."
                   (or (company-grab-symbol) 'stop)))
     ('candidates (let ((tags-table-list (company-etags-buffer-table))
                        (completion-ignore-case nil))
-                   (and (fboundp 'tags-completion-table)
+                   (and (or tags-file-name tags-table-list)
+                        (fboundp 'tags-completion-table)
+                        tags-table-list
                         (all-completions arg (tags-completion-table)))))
     ('location (let ((tags-table-list (company-etags-buffer-table)))
                  (when (fboundp 'find-tag-noselect)