diff options
author | Richard M. Stallman <[email protected]> | 2004-11-01 07:39:44 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 2004-11-01 07:39:44 +0000 |
commit | 751adbdeccb326c6f04da69f01dbfef527e739c4 (patch) | |
tree | 0fc0443722faa17fc5356d32c7952a0e03be7e75 /lisp/progmodes | |
parent | 8d422bd5a55cb1e97fdcf8a1af36f3a845326331 (diff) |
(idlwave-update-routine-info): Don't use interactive-p.
Diffstat (limited to 'lisp/progmodes')
-rw-r--r-- | lisp/progmodes/idlwave.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/progmodes/idlwave.el b/lisp/progmodes/idlwave.el index a49f70aa0b..a5e0704984 100644 --- a/lisp/progmodes/idlwave.el +++ b/lisp/progmodes/idlwave.el @@ -4231,7 +4231,7 @@ will re-read the catalog." (defvar idlwave-load-rinfo-idle-timer) -(defun idlwave-update-routine-info (&optional arg) +(defun idlwave-update-routine-info (&optional arg dont-concentrate) "Update the internal routine-info lists. These lists are used by `idlwave-routine-info' (\\[idlwave-routine-info]) and by `idlwave-complete' (\\[idlwave-complete]) to provide information @@ -4248,10 +4248,12 @@ Scans all IDLWAVE-mode buffers of the current editing session (see When an IDL shell is running, this command also queries the IDL program for currently compiled routines. +???Document what DONT-CONCENTRATE means??? + With prefix ARG, also reload the system and library lists. With two prefix ARG's, also rescans the library tree. With three prefix args, dispatch asynchronous process to do the update." - (interactive "P") + (interactive "P\np") ;; Stop any idle processing (if (or (and (fboundp 'itimerp) (itimerp idlwave-load-rinfo-idle-timer)) @@ -4300,7 +4302,7 @@ With three prefix args, dispatch asynchronous process to do the update." idlwave-query-shell-for-routine-info))) (if (or (not ask-shell) - (not (interactive-p))) + (not dont-concentrate)) ;; 1. If we are not going to ask the shell, we need to do the ;; concatenation now. ;; 2. When this function is called non-interactively, it means |