diff options
| author | Glenn Morris | 2008-02-28 03:47:24 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-02-28 03:47:24 +0000 |
| commit | d6a277d036cb6f163cd20edb1cd159dd0fa8e327 (patch) | |
| tree | 09592f619509a06eed6492a851c7a1a29572a87c | |
| parent | a2e43f129bf52cf0d1663cb48a48d06e29f7f95d (diff) | |
| download | emacs-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.el | 7 |
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. |