Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
changed: #classMenuNewWebService
authorClaus Gittinger <cg@exept.de>
Sat, 09 Apr 2011 10:47:18 +0200
changeset 9813 528f4a43e1a4
parent 9812 a2efaef3f9e1
child 9814 9cbbd1c58821
changed: #classMenuNewWebService
NewSystemBrowser.st file | annotate | diff | comparison | revisions
Tools__NewSystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/NewSystemBrowser.st	Fri Apr 08 14:57:08 2011 +0200
+++ b/NewSystemBrowser.st	Sat Apr 09 10:47:18 2011 +0200
@@ -21245,6 +21245,9 @@
 classMenuNewWebService
     "create a class-definition prototype for a web application"
 
+    HTTPService isNil ifTrue:[ Smalltalk loadPackage:'stx:goodies/webServer' ].
+    HTTPService autoload.
+
     self
         classClassDefinitionTemplateFor:HTTPService
         in:(self theSingleSelectedCategory ? 'WebServices')
@@ -21253,7 +21256,7 @@
 
     self codeAspect:#newWebService.
 
-    "Modified: / 24-11-2006 / 15:52:51 / cg"
+    "Modified: / 09-04-2011 / 10:46:22 / cg"
 !
 
 classMenuNewWidgetClass
@@ -45150,11 +45153,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1521 2011-03-31 11:22:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1522 2011-04-09 08:47:18 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1521 2011-03-31 11:22:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1522 2011-04-09 08:47:18 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Fri Apr 08 14:57:08 2011 +0200
+++ b/Tools__NewSystemBrowser.st	Sat Apr 09 10:47:18 2011 +0200
@@ -21245,6 +21245,9 @@
 classMenuNewWebService
     "create a class-definition prototype for a web application"
 
+    HTTPService isNil ifTrue:[ Smalltalk loadPackage:'stx:goodies/webServer' ].
+    HTTPService autoload.
+
     self
         classClassDefinitionTemplateFor:HTTPService
         in:(self theSingleSelectedCategory ? 'WebServices')
@@ -21253,7 +21256,7 @@
 
     self codeAspect:#newWebService.
 
-    "Modified: / 24-11-2006 / 15:52:51 / cg"
+    "Modified: / 09-04-2011 / 10:46:22 / cg"
 !
 
 classMenuNewWidgetClass
@@ -45150,11 +45153,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1521 2011-03-31 11:22:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1522 2011-04-09 08:47:18 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1521 2011-03-31 11:22:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1522 2011-04-09 08:47:18 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
hg/stx-libtool