equal
deleted
inserted
replaced
893 mhmh - what is the difference to #openInterface ?" |
893 mhmh - what is the difference to #openInterface ?" |
894 |
894 |
895 ^ self openInterface:aSpecSymbol |
895 ^ self openInterface:aSpecSymbol |
896 |
896 |
897 "Modified: 29.8.1997 / 01:16:52 / cg" |
897 "Modified: 29.8.1997 / 01:16:52 / cg" |
898 ! |
898 ! ! |
|
899 |
|
900 !ApplicationModel class methodsFor:'startup-web applications'! |
899 |
901 |
900 startAsWebService |
902 startAsWebService |
|
903 "this is not yet a public interface. For internal exept use only" |
|
904 |
901 |app| |
905 |app| |
902 |
906 |
903 app := self basicNew. |
907 app := self basicNew. |
904 app setDevice:(WebApplicationDevice new). |
908 app setDevice:(WebApplicationDevice new). |
905 app initializeWebServiceDevice. |
909 app initializeWebServiceDevice. |
908 " |
912 " |
909 PortalTests::TestApplication1 startAsWebService |
913 PortalTests::TestApplication1 startAsWebService |
910 " |
914 " |
911 ! |
915 ! |
912 |
916 |
913 startIn:aPortalService |
|
914 self new startIn:aPortalService |
|
915 ! |
|
916 |
|
917 startInPortalService:aPortalService |
917 startInPortalService:aPortalService |
|
918 "this is not yet a public interface. For internal exept use only" |
|
919 |
918 |app| |
920 |app| |
919 |
921 |
920 app := self basicNew. |
922 app := self basicNew. |
921 app setDevice:(WebApplicationDevice new). |
923 app setDevice:(WebApplicationDevice new). |
922 app startInPortalService:aPortalService. |
924 app startInPortalService:aPortalService. |
3379 ! ! |
3381 ! ! |
3380 |
3382 |
3381 !ApplicationModel class methodsFor:'documentation'! |
3383 !ApplicationModel class methodsFor:'documentation'! |
3382 |
3384 |
3383 version |
3385 version |
3384 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.260 2008-10-08 18:48:51 cg Exp $' |
3386 ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.261 2008-10-08 18:50:36 cg Exp $' |
3385 ! ! |
3387 ! ! |
3386 |
3388 |
3387 ApplicationModel initialize! |
3389 ApplicationModel initialize! |