Return nil when etags aren't found.

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

diff --git a/company-etags.el b/company-etags.el
index eb1e5ece2fa7b4286847f4a02593ac375a955ed9..f7d71dcdf1e5ffc6e97b083cb408d4338e2f639f 100644 (file)
--- a/company-etags.el
+++ b/company-etags.el
@@ -45,7 +45,8 @@ buffer automatically."
       (unless (file-exists-p (setq file (expand-file-name "TAGS" dir)))
         (setq file nil
               dir (file-name-directory (directory-file-name dir)))))
-    (list file)))
+    (when file
+      (list file))))
 
 (defun company-etags-buffer-table ()
   (or (and company-etags-use-main-table-list tags-table-list)