[debugger] Add P command to inspect the currently evaluted value

Author: alexander-yakushev

CHANGELOG.md

@@ -6,6 +6,7 @@
 
 * [#605](https://github.com/clojure-emacs/cider-nrepl/pull/605): Added a option for filtering vars to the ns-vars middleware.
 * Added `xref` middleware providing `fn-deps` and `fn-refs` ops.
+* [#613](https://github.com/clojure-emacs/cider-nrepl/pull/613): Add the ability to inspect current debugger value by pressing P.
 
 ### Bugs fixed
 

src/cider/nrepl/middleware/debug.clj

@@ -305,6 +305,7 @@ this map (identified by a key), and will `dissoc` it afterwards."}
    "n" :next
    "o" :out
    "p" :inspect
+   "P" :insPect
    "q" :quit
    "s" :stacktrace
    "t" :trace})
@@ -370,6 +371,9 @@ this map (identified by a key), and will `dissoc` it afterwards."}
                            (assoc dbg-state :inspect)
                            (recur value))
                       (recur value dbg-state))
+        :insPect    (->> (debug-inspect page-size value)
+                         (assoc dbg-state :inspect)
+                         (recur value))
         :inject     (try-if-let [val (read-eval-expression "Expression to inject: " dbg-state code)]
                       val
                       (recur value dbg-state))