From d6a277d036cb6f163cd20edb1cd159dd0fa8e327 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 28 Feb 2008 03:47:24 +0000 Subject: [PATCH] (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. --- lisp/progmodes/idlwave.el | 7 +------ 1 file changed, 1 insertion(+), 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 @@ (declare-function idlwave-shell-is-running "idlw-shell") (declare-function widget-value "wid-edit" (widget)) (declare-function comint-dynamic-complete-filename "comint" ()) -(declare-function Info-goto-node "info" (nodename &optional fork)) (defgroup idlwave nil "Major mode for editing IDL .pro files." @@ -4906,7 +4905,6 @@ Cache to disk for quick recovery." (error "No such XML routine info file: %s" catalog-file) (if (not (file-readable-p catalog-file)) (error "Cannot read XML routine info file: %s" catalog-file))) - (require 'xml) (message "Reading XML routine info...") (setq rinfo (xml-parse-file catalog-file)) (message "Reading XML routine info...done") @@ -9291,20 +9289,17 @@ Assumes that point is at the beginning of the unit as found by (defun idlwave-show-commentary () "Use the finder to view the file documentation from `idlwave.el'." (interactive) - (require 'finder) (finder-commentary "idlwave.el")) (defun idlwave-shell-show-commentary () "Use the finder to view the file documentation from `idlw-shell.el'." (interactive) - (require 'finder) (finder-commentary "idlw-shell.el")) (defun idlwave-info () "Read documentation for IDLWAVE in the info system." (interactive) - (require 'info) - (Info-goto-node "(idlwave)")) + (info "idlwave")) (defun idlwave-list-abbrevs (arg) "Show the code abbreviations define in IDLWAVE mode. -- 2.39.2