emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/crdt c495170 09/80: remove debug statements


From: ELPA Syncer
Subject: [elpa] externals/crdt c495170 09/80: remove debug statements
Date: Sat, 28 Aug 2021 10:57:31 -0400 (EDT)

branch: externals/crdt
commit c4951702768a1743cd3de40c72adbc5e09e7b14e
Author: Qiantan Hong <qhong@mit.edu>
Commit: Qiantan Hong <qhong@mit.edu>

    remove debug statements
---
 crdt.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/crdt.el b/crdt.el
index b6a618e..6774771 100644
--- a/crdt.el
+++ b/crdt.el
@@ -798,7 +798,7 @@ If CRDT--NETWORK-PROCESS is a server process, broadcast 
MESSAGE-STRING
 to clients except the one of which CLIENT-ID property is EQ to WITHOUT.
 If CRDT--NETWORK-PROCESS is a client process, send MESSAGE-STRING
 to server when WITHOUT is T."
-  (message "Send %s" message-string)
+  ;; (message "Send %s" message-string)
   (if (process-contact (crdt--network-process) :server)
       (dolist (client (crdt--network-clients))
         (when (and (eq (process-status client) 'open)
@@ -1032,7 +1032,7 @@ Must be called when CURRENT-BUFFER is a CRDT status 
buffer."
       (goto-char (point-min))
       (let (message)
         (while (setq message (ignore-errors (read (current-buffer))))
-          (print message)
+          ;; (print message)
           (cl-macrolet ((body ()
                           '(if (or (not (crdt--server-p)) (process-get process 
'authenticated))
                             (let ((crdt--inhibit-update t))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]