branch: externals/dape
commit 480bcd14f8f786c60c72c635c4f81d1b4e88d700
Author: Daniel Pettersson <[email protected]>
Commit: Daniel Pettersson <[email protected]>
Improve REPL welcome message
---
dape.el | 16 ++++++++++++++--
1 file changed, 14 insertions(+), 2 deletions(-)
diff --git a/dape.el b/dape.el
index 3bc3ab1bab..efd43eca2e 100644
--- a/dape.el
+++ b/dape.el
@@ -1973,8 +1973,20 @@ Buffer contains debug session information."
'comint-output-filter)
(comint-output-filter (get-buffer-process (current-buffer))
(format
- "\nWelcome to Dape REPL\n%s\n> "
- (pp-to-string dape--config)))))
+ "Welcome to Dape REPL!
+Available Dape commands: %s
+Empty string will rerun last command.\n\n\n> "
+ (mapconcat 'identity
+ (mapcar (lambda (cmd)
+ (let ((str (car cmd)))
+ (if dape-repl-use-shorthand
+ (concat "["
+ (substring str 0
1)
+ "]"
+ (substring str
1))
+ str)))
+ dape-repl-commands)
+ ", ")))))
(defun dape-repl ()
"Create or select *dape-repl* buffer."
