branch: externals/idlwave
commit 369eb32d5ae3057eb535e78887f1999e6e6e4d29
Author: JD Smith <jdtsm...@gmail.com>
Commit: JD Smith <jdtsm...@gmail.com>
If no default command, prompt for one
Also, don't reset IDL
---
idlw-shell.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/idlw-shell.el b/idlw-shell.el
index 93a8b1ddf8..5ff7d7af99 100644
--- a/idlw-shell.el
+++ b/idlw-shell.el
@@ -3936,10 +3936,9 @@ Also with prefix arg, ask for the command. You can also
use the command
(cond
((equal arg '(16))
(setq idlwave-shell-command-line-to-execute nil))
- ((equal arg '(4))
- (setq idlwave-shell-command-line-to-execute
- (read-string "IDL> " idlwave-shell-command-line-to-execute))))
- (idlwave-shell-reset 'hidden)
+ ((or (null idlwave-shell-command-line-to-execute) (equal arg '(4)))
+ (idlwave-shell-edit-default-command-line nil)))
+ ;;(idlwave-shell-reset 'hidden)
(idlwave-shell-send-command
(or idlwave-shell-command-line-to-execute
(with-current-buffer (idlwave-shell-buffer)
