From 828869b3b4fabfdb6a4ed03955ec0e62a0d1fb3d Mon Sep 17 00:00:00 2001 From: Oleksandr Yakushev Date: Wed, 5 Mar 2025 14:51:11 +0200 Subject: [PATCH] [inspector] Fix inspecting value from the debugger --- cider-inspector.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/cider-inspector.el b/cider-inspector.el index 97481cc46..774f79406 100644 --- a/cider-inspector.el +++ b/cider-inspector.el @@ -530,9 +530,13 @@ MAX-COLL-SIZE if non nil." (declare-function cider-set-buffer-ns "cider-mode") ;; Render Inspector from Structured Values -(defun cider-inspector--render-value (response-dict) - "Render value in RESPONSE-DICT." - (let* ((value (nrepl-dict-get response-dict "value")) +(defun cider-inspector--render-value (dict-or-value) + "Render DICT-OR-VALUE. +It can either be a value directly or a inspector response that contains +`value' field." + (let* ((value (if (nrepl-dict-p dict-or-value) + (nrepl-dict-get dict-or-value "value") + dict-or-value)) (ns (cider-current-ns)) (font-size (when-let* ((b (get-buffer cider-inspector-buffer)) (variable 'text-scale-mode-amount)