         (while (null file)
           (or erlang-tags-file-list
               (save-excursion
-                (if (and (featurep 'etags)
-                         (funcall
+                (if (and (funcall
                           (symbol-function 'visit-tags-table-buffer) 'same)
                          (funcall
                           (symbol-function 'visit-tags-table-buffer) t))


(defconst erlang-unload-hook
  (list (lambda ()
          (when (featurep 'advice)
            (ad-unadvise 'Man-notify-when-ready)
            (ad-unadvise 'set-visited-file-name)))))

;; The end...


  (defvar next-error-last-buffer))

(eval-when-compile
  (require 'comint)
  (require 'tempo)
  (require 'compile))


(defun erlang-version ()
