X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/0ead54c6ffb0e744fbbc32c9dd8614856ebbc354..84c0e7b34684cbf4162f80f167a1178657779d87:/packages/company/company-etags.el

diff --git a/packages/company/company-etags.el b/packages/company/company-etags.el
index c7ba60870..1c01c9167 100644
--- a/packages/company/company-etags.el
+++ b/packages/company/company-etags.el
@@ -54,7 +54,7 @@ buffer automatically."
   (let ((file (locate-dominating-file (or buffer-file-name
                                           default-directory)
                                       "TAGS")))
-    (when file
+    (when (and file (file-regular-p file))
       (list (expand-file-name file)))))
 
 (defun company-etags-buffer-table ()