[elpa] externals/ess a08cdb292f: Only write command debugging info if verbose

[ELPA Syncer]

branch: externals/ess
commit a08cdb292fc07e771b1a8aba1ad9558d2b37fa19
Author: Lionel Henry <lionel.hry@gmail.com>
Commit: Lionel Henry <lionel.hry@gmail.com>

    Only write command debugging info if verbose
---
 lisp/ess-inf.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/ess-inf.el b/lisp/ess-inf.el
index 83a2cd612e..f116bc336d 100644
--- a/lisp/ess-inf.el
+++ b/lisp/ess-inf.el
@@ -1070,7 +1070,7 @@ Returns nil if TIMEOUT was reached, non-nil otherwise."
                                (ess--command-delimited-output-info cmd-buf 
cmd-delim)
                              (ess--command-output-info cmd-buf))))
                 (let ((new-output (ess--command-set-status proc cmd-buf info)))
-                  (ess-write-to-dribble-buffer
+                  (ess-if-verbose-write
                    "ess-command (filter): Found prompt\n")
                   (when (not (process-get proc 'busy))
                     ;; Store new output until restoration
@@ -1083,13 +1083,13 @@ Returns nil if TIMEOUT was reached, non-nil otherwise."
                     (when (process-get proc 'callbacks)
                       (inferior-ess-run-callback proc (with-current-buffer 
cmd-buf
                                                         (buffer-string))))))
-              (ess-write-to-dribble-buffer
+              (ess-if-verbose-write
                "ess-command (filter): Accumulating output\n"))
             (setq early-exit nil))
         ;; Be defensive when something goes wrong. Restore process to a
         ;; usable state.
         (when early-exit
-          (ess-write-to-dribble-buffer
+          (ess-if-verbose-write
            "ess-command (filter): Early exit\n")
           (process-put proc 'busy nil)
           (funcall (process-get proc 'cmd-restore-function)))))))