--- a/UserPreferences.st	Tue Jun 12 23:19:14 2018 +0200
+++ b/UserPreferences.st	Wed Jun 13 17:33:14 2018 +0200
@@ -1068,6 +1068,29 @@
     "
 !
 
+logNetCommunications
+    ^ self at:#logNetCommunications ifAbsent:false
+
+    "Created: / 13-06-2018 / 17:28:35 / Claus Gittinger"
+!
+
+logNetCommunications:aBoolean
+    self at:#logNetCommunications put:aBoolean.
+
+    "/ use Smalltalk at: to avoid prerequisite package dependency
+    (Smalltalk at:#'Net::NetEnvironment') notNil ifTrue:[
+        (Smalltalk at:#'Net::NetEnvironment') verbose:aBoolean.
+    ].    
+
+    "
+     UserPreferences current logNetCommunications
+     UserPreferences current logNetCommunications:true
+     UserPreferences current logNetCommunications:false
+    "
+
+    "Created: / 13-06-2018 / 17:29:42 / Claus Gittinger"
+!
+
 logSOAPRequests
     ^ (self soapLoggingLevel ? 0) > 0
 !
@@ -1623,7 +1646,6 @@
     ^ DiffCodeView
 ! !
 
-
 !UserPreferences methodsFor:'accessing-prefs-UI'!
 
 allowMouseWheelZoom