aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-02-28 03:47:24 +0000
committerGlenn Morris2008-02-28 03:47:24 +0000
commitd6a277d036cb6f163cd20edb1cd159dd0fa8e327 (patch)
tree09592f619509a06eed6492a851c7a1a29572a87c
parenta2e43f129bf52cf0d1663cb48a48d06e29f7f95d (diff)
downloademacs-d6a277d036cb6f163cd20edb1cd159dd0fa8e327.tar.gz
emacs-d6a277d036cb6f163cd20edb1cd159dd0fa8e327.zip
(Info-goto-node): Remove declaration.
(idlwave-convert-xml-system-routine-info): Don't require xml. (idlwave-show-commentary, idlwave-shell-show-commentary): Don't require finder. (idlwave-info): Don't require info. Use info rather than Info-goto-node.
-rw-r--r--lisp/progmodes/idlwave.el7
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el
index 8de8c8a3f08..3d8a5175d27 100644
--- a/lisp/progmodes/idlwave.el
+++ b/lisp/progmodes/idlwave.el
@@ -177,7 +177,6 @@
177(declare-function idlwave-shell-is-running "idlw-shell") 177(declare-function idlwave-shell-is-running "idlw-shell")
178(declare-function widget-value "wid-edit" (widget)) 178(declare-function widget-value "wid-edit" (widget))
179(declare-function comint-dynamic-complete-filename "comint" ()) 179(declare-function comint-dynamic-complete-filename "comint" ())
180(declare-function Info-goto-node "info" (nodename &optional fork))
181 180
182(defgroup idlwave nil 181(defgroup idlwave nil
183 "Major mode for editing IDL .pro files." 182 "Major mode for editing IDL .pro files."
@@ -4906,7 +4905,6 @@ Cache to disk for quick recovery."
4906 (error "No such XML routine info file: %s" catalog-file) 4905 (error "No such XML routine info file: %s" catalog-file)
4907 (if (not (file-readable-p catalog-file)) 4906 (if (not (file-readable-p catalog-file))
4908 (error "Cannot read XML routine info file: %s" catalog-file))) 4907 (error "Cannot read XML routine info file: %s" catalog-file)))
4909 (require 'xml)
4910 (message "Reading XML routine info...") 4908 (message "Reading XML routine info...")
4911 (setq rinfo (xml-parse-file catalog-file)) 4909 (setq rinfo (xml-parse-file catalog-file))
4912 (message "Reading XML routine info...done") 4910 (message "Reading XML routine info...done")
@@ -9291,20 +9289,17 @@ Assumes that point is at the beginning of the unit as found by
9291(defun idlwave-show-commentary () 9289(defun idlwave-show-commentary ()
9292 "Use the finder to view the file documentation from `idlwave.el'." 9290 "Use the finder to view the file documentation from `idlwave.el'."
9293 (interactive) 9291 (interactive)
9294 (require 'finder)
9295 (finder-commentary "idlwave.el")) 9292 (finder-commentary "idlwave.el"))
9296 9293
9297(defun idlwave-shell-show-commentary () 9294(defun idlwave-shell-show-commentary ()
9298 "Use the finder to view the file documentation from `idlw-shell.el'." 9295 "Use the finder to view the file documentation from `idlw-shell.el'."
9299 (interactive) 9296 (interactive)
9300 (require 'finder)
9301 (finder-commentary "idlw-shell.el")) 9297 (finder-commentary "idlw-shell.el"))
9302 9298
9303(defun idlwave-info () 9299(defun idlwave-info ()
9304 "Read documentation for IDLWAVE in the info system." 9300 "Read documentation for IDLWAVE in the info system."
9305 (interactive) 9301 (interactive)
9306 (require 'info) 9302 (info "idlwave"))
9307 (Info-goto-node "(idlwave)"))
9308 9303
9309(defun idlwave-list-abbrevs (arg) 9304(defun idlwave-list-abbrevs (arg)
9310 "Show the code abbreviations define in IDLWAVE mode. 9305 "Show the code abbreviations define in IDLWAVE mode.