Tidy up some js.el requires.

* lisp/progmodes/js.el: Doc't require font-lock, etags, or easymenu.
(find-tag-marker-ring): Declare.
(js-find-symbol): Require etags.
This commit is contained in:
Glenn Morris 2010-12-14 00:06:18 -08:00
parent e758216c60
commit ab274982aa
2 changed files with 8 additions and 4 deletions

View file

@ -1,5 +1,9 @@
2010-12-14 Glenn Morris <rgm@gnu.org>
* progmodes/js.el: Doc't require font-lock, etags, or easymenu.
(find-tag-marker-ring): Declare.
(js-find-symbol): Require etags.
* mail/sendmail.el: Don't require rmail or mailalias when compiling.
Require mail-utils.
(mail-alias-file): Don't autoload. Doc fix.

View file

@ -47,12 +47,9 @@
(require 'cc-mode)
(require 'font-lock)
(require 'newcomment)
(require 'thingatpt) ; forward-symbol etc
(require 'imenu)
(require 'etags)
(require 'thingatpt)
(require 'easymenu)
(require 'moz nil t)
(require 'json nil t)
@ -2171,12 +2168,15 @@ marker."
(setf (car bounds) (point))))
(buffer-substring (car bounds) (cdr bounds)))))
(defvar find-tag-marker-ring) ; etags
(defun js-find-symbol (&optional arg)
"Read a JavaScript symbol and jump to it.
With a prefix argument, restrict symbols to those from the
current buffer. Pushes a mark onto the tag ring just like
`find-tag'."
(interactive "P")
(require 'etags)
(let (symbols marker)
(if (not arg)
(setq symbols (js--get-all-known-symbols))