--- a/ApplicationModel.st	Wed Oct 08 20:48:51 2008 +0200
+++ b/ApplicationModel.st	Wed Oct 08 20:50:36 2008 +0200
@@ -895,9 +895,13 @@
     ^ self openInterface:aSpecSymbol
 
     "Modified: 29.8.1997 / 01:16:52 / cg"
-!
+! !
+
+!ApplicationModel class methodsFor:'startup-web applications'!
 
 startAsWebService
+    "this is not yet a public interface. For internal exept use only"
+
     |app|
 
     app := self basicNew.
@@ -910,11 +914,9 @@
     "
 !
 
-startIn:aPortalService
-    self new startIn:aPortalService
-!
-
 startInPortalService:aPortalService
+    "this is not yet a public interface. For internal exept use only"
+
     |app|
 
     app := self basicNew.
@@ -3381,7 +3383,7 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.260 2008-10-08 18:48:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.261 2008-10-08 18:50:36 cg Exp $'
 ! !
 
 ApplicationModel initialize!