* progmodes/etags.el (tags-apropos, list-tags): Require apropos.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 43028f03e69ac8cb963bec5969ebaf7ba2f79967..2fce46e2fa6e0965a063ef5855881dc07de5a32b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-05-21  Masatake YAMATO  <jet@gyve.org>
+
+       * progmodes/etags.el (tags-apropos, list-tags): Require
+       apropos.
+
 2004-05-20  Luc Teirlinck  <teirllm@auburn.edu>
 
        * locate.el (locate-prompt-for-command): Shorten first line of

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index ef5d1eba998e46ebb5c1723adc31ef0ea10bd71a..49294d6625c957b4d8c1c93f5742e4a6a728387f 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1866,6 +1866,7 @@ directory specification."
        (or gotany
            (error "File %s not in current tags tables" file)))))
   (with-current-buffer "*Tags List*"
+    (require 'apropos)
     (apropos-mode)
     (setq buffer-read-only t)))
 
@@ -1884,6 +1885,7 @@ directory specification."
          (funcall tags-apropos-function regexp))))
     (etags-tags-apropos-additional regexp))
   (with-current-buffer "*Tags List*"
+    (require 'apropos)
     (apropos-mode)
     ;; apropos-mode is derived from fundamental-mode and it kills
     ;; all local variables.