[elpa] externals/crdt 3a78c8a615 24/44: Improve settings form when CRDT-USE-STUNNEL is nil

[ELPA Syncer]

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

    Improve settings form when CRDT-USE-STUNNEL is nil
    
    also remove some debug printing
---
 crdt.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/crdt.el b/crdt.el
index b92ded9422..639d4b8d81 100644
--- a/crdt.el
+++ b/crdt.el
@@ -2164,7 +2164,8 @@ Create a new one if such a CRDT session doesn't exist."
                 (crdt-read-settings
                  (format "*Settings for %s*" session-name)
                  `(("Port: " "6530" ,(crdt--settings-make-ensure-type 
'numberp))
-                   ("Secure Port: " "6540" ,(crdt--settings-make-ensure-type 
'numberp))
+                   ("Secure Port: " ,(if crdt-use-stunnel "6540" "--")
+                                    ,(when crdt-use-stunnel 
(crdt--settings-make-ensure-type 'numberp)))
                    ("Session Name: " ,session-name 
,(crdt--settings-make-ensure-nonempty session-name))
                    ("Password: " "")
                    ("Display Name: " ,crdt-default-name)
@@ -2426,7 +2427,6 @@ Join with DISPLAY-NAME."
                                              (gnutls-boot-parameters
                                               :type 'gnutls-x509pki
                                               :hostname (url-host url))))))
-                   (message "%s" (process-status proc))
                    (unless (eq (process-status proc) 'open)
                      (signal 'file-error "Failed to establish TLS 
connection."))
                    proc)