fix: Duplicate print

jcs-elpa · Dec 7, 2023 · 7be4111 · 7be4111
1 parent 0415b1a
commit 7be4111
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/ic.el b/ic.el
@@ -110,9 +110,10 @@ Arguments FNC and ARGS are for function `advice-add'."
          (concat (pp object)
                  (ppp-plist-to-string (ht-to-plist object))))
         (t
-         (let ((func (cond ((listp object)       #'ppp-list-to-string)
-                           (t                    #'pp))))
-           (ic-2str (funcall func object))))))
+         (let* ((func (cond ((listp object)       #'ppp-list-to-string)
+                            (t                    #'pp)))
+                (result (msgu-silent (apply func (list object)))))
+           (ic-2str result)))))
 
 (defun ic--mapconcat (func seq)
   "Like function `mapconcat', but compatible to newline separator.