--- a/ApplicationModel.st	Wed Oct 08 22:15:33 2008 +0200
+++ b/ApplicationModel.st	Sat Oct 11 17:40:33 2008 +0200
@@ -906,6 +906,7 @@
 
     app := self basicNew.
     app setDevice:(WebApplicationDevice new).
+    app initialize.
     app initializeWebServiceDevice.
     app initializeResources.
     app startAsWebService.
@@ -922,6 +923,7 @@
 
     app := self basicNew.
     app setDevice:(WebApplicationDevice new).
+    app initialize.
     app initializeResources.
     app startInPortalService:aPortalService.
 
@@ -3385,7 +3387,7 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.262 2008-10-08 20:15:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.263 2008-10-11 15:40:33 cg Exp $'
 ! !
 
 ApplicationModel initialize!