Use the inspect-toggle-pretty-print NREPL op

Author: r0man

cider-inspector.el

@@ -97,11 +97,6 @@ Can be turned to nil once the user sees and acknowledges the feature."
   :type 'boolean
   :package-version '(cider . "1.18.0"))
 
-(defcustom cider-inspector-pretty-print nil
-  "When true, pretty print values in the inspector."
-  :type 'boolean
-  :package-version '(cider . "1.18.0"))
-
 (defvar cider-inspector-uninteresting-regexp
   (concat "nil"                      ; nils are not interesting
           "\\|:" clojure--sym-regexp ; nor keywords
@@ -358,10 +353,11 @@ MAX-NESTED-DEPTH is the new value."
 (defun cider-inspector-toggle-pretty-print ()
   "Toggle the pretty printing of values in the inspector."
   (interactive)
-  (let ((pretty-print-p (not cider-inspector-pretty-print)))
-    (setq cider-inspector-pretty-print pretty-print-p)
-    (cider-inspector--refresh-with-opts "pretty-print" (if pretty-print-p "true" "false"))
-    (message "Pretty printing in the inspector %s." (if pretty-print-p "enabled" "disabled"))))
+  (let ((result (cider-nrepl-send-sync-request
+                 `("op" "inspect-toggle-pretty-print")
+                 (cider-current-repl))))
+    (when (nrepl-dict-get result "value")
+      (cider-inspector--render-value result))))
 
 (defun cider-inspector-toggle-view-mode ()
   "Toggle the view mode of the inspector between normal and object view mode."