--- a/AbstractSettingsApplication.st	Sun May 13 11:30:16 2012 +0200
+++ b/AbstractSettingsApplication.st	Mon May 14 12:40:01 2012 +0200
@@ -5537,14 +5537,25 @@
 !
 
 informationLabel
-    ^ resources 
+    |info|
+
+    info := resources 
         string:'HTTPSTARTINFO'
         default:
 'This dialog enables you to create (possibly multiple) HTTP Server processes. 
 (i.e. it is possible to serve multiple ports)
 
 Once created, select the individual server in the left tree, 
-configure its services, and finally start it up.'
+configure its services, and finally start it up.'.
+
+    self hasHTTPServerClass ifFalse:[
+        info := info , 
+                '\\' withCRs, 
+                (resources string:'ATTENTION: Disabled because HTTPServer class is missing.') allBold
+    ].
+    ^ info
+
+    "Modified: / 14-05-2012 / 12:35:46 / cg"
 !
 
 portNumberChannel
@@ -17042,9 +17053,9 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.437 2012-03-20 20:54:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.438 2012-05-14 10:40:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.437 2012-03-20 20:54:16 cg Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.438 2012-05-14 10:40:01 cg Exp $'
+! !