--- a/AbstractSettingsApplication.st	Wed May 18 17:27:02 2016 +0200
+++ b/AbstractSettingsApplication.st	Thu May 19 17:46:41 2016 +0200
@@ -5979,14 +5979,13 @@
     self withWaitCursorDo:[
         port := self portNumberChannel value.
         runningServers := serverClass runningServers.
-        runningServers notEmpty ifTrue:[
-            runningServers do:[:aServer |
-                aServer port = port asInteger ifTrue:[
-                    Dialog warn:'There is already a server for port ', port asString.
-                    ^ self
-                ]
+
+        runningServers do:[:aServer |
+            aServer port = port asInteger ifTrue:[
+                Dialog warn:'There is already a server for port ', port asString.
+                ^ self
             ]
-        ].
+        ].   
         runningServers addDependent:self.
 
         (port = serverClass defaultPort) ifTrue:[