[elpa] externals/dape 9a75efe29c 9/9: Improve usefulness of dape-evaluate-expression

[ELPA Syncer]

branch: externals/dape
commit 9a75efe29c8b51d27506e85c2fc4afc7ca7a8e90
Author: Daniel Pettersson <dan...@dpettersson.net>
Commit: Daniel Pettersson <dan...@dpettersson.net>

    Improve usefulness of dape-evaluate-expression
---
 dape.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/dape.el b/dape.el
index 8300dbe30c..8885639638 100644
--- a/dape.el
+++ b/dape.el
@@ -1856,7 +1856,9 @@ Watched symbols are displayed in *dape-info* buffer.
   (run-hooks 'dape-update-ui-hooks))
 
 (defun dape-evaluate-expression (expression)
-  "Evaluate EXPRESSION."
+  "Evaluate EXPRESSION.
+EXPRESSION can be an expression or adapter command, as it's evaluated in
+repl context."
   (interactive
    (list (string-trim
           (read-string "Evaluate: "
@@ -1867,8 +1869,8 @@ Watched symbols are displayed in *dape-info* buffer.
   (dape--with dape--evaluate-expression ((dape--live-process)
                                          (plist-get 
(dape--current-stack-frame) :id)
                                          (substring-no-properties expression)
-                                         "hover")
-      (message "%S" body)))
+                                         "repl")
+      (message "%s" (plist-get body :result))))
 
 ;;;###autoload
 (defun dape (config &optional skip-compile)