--- a/AbstractSettingsApplication.st	Thu May 08 12:08:26 2003 +0200
+++ b/AbstractSettingsApplication.st	Thu May 08 12:10:17 2003 +0200
@@ -267,7 +267,7 @@
     |result|
 
     (self hasUnsavedChanges) ifTrue:[
-        self askForChangeOnRealease ifTrue:[
+        self askForChangeOnRelease ifTrue:[
             result := self confirmWithCancel:(resources 
                                 string:'Save changed ' , settingsString , ' ?').
         ] ifFalse:[
@@ -314,7 +314,7 @@
 
 !AbstractSettingsApplication methodsFor:'protocol'!
 
-askForChangeOnRealease
+askForChangeOnRelease
     ^ false
 !
 
@@ -3016,7 +3016,7 @@
 !AbstractSettingsApplication::HTTPStartServerSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.59 2003-04-29 10:07:20 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.60 2003-05-08 10:10:17 penk Exp $'
 ! !
 
 !AbstractSettingsApplication::HTTPStartServerSettingsApplication class methodsFor:'image specs'!
@@ -3202,7 +3202,7 @@
     self withWaitCursorDo:[
         newServer := HTTPServer new.
         newServer port:port.
-        newServer setupDefaults.
+"/        newServer setupDefaults.
         self createServerApplication:newServer forDefault:false.
     ]
 !
@@ -10880,5 +10880,5 @@
 !AbstractSettingsApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.59 2003-04-29 10:07:20 penk Exp $'
-! !
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractSettingsApplication.st,v 1.60 2003-05-08 10:10:17 penk Exp $'
+! !