src/JavaUtilities.st
branchjk_new_structure
changeset 1487 4451c861f2f6
parent 1481 28b926d3cdb5
child 1488 ab937147149f
--- a/src/JavaUtilities.st	Sat May 05 21:25:57 2012 +0000
+++ b/src/JavaUtilities.st	Mon May 07 21:26:03 2012 +0000
@@ -27,7 +27,14 @@
 	category:'Languages-Java-Utilities'
 !
 
-Object subclass:#Tomcat
+Object subclass:#Tomcat6x
+	instanceVariableNames:'bootstrap'
+	classVariableNames:''
+	poolDictionaries:''
+	privateIn:JavaUtilities
+!
+
+Object subclass:#Tomcat7x
 	instanceVariableNames:'bootstrap'
 	classVariableNames:''
 	poolDictionaries:''
@@ -64,12 +71,26 @@
 
 tomcat
 
-    ^Tomcat new
+    ^self tomcat6x
 
     "Created: / 08-12-2011 / 00:32:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+tomcat6x
+
+    ^Tomcat6x new
+
+    "Created: / 07-05-2012 / 22:03:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+tomcat7x
+
+    ^Tomcat7x new
+
+    "Created: / 07-05-2012 / 22:11:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!JavaUtilities::Tomcat methodsFor:'accessing - paths'!
+!JavaUtilities::Tomcat6x methodsFor:'accessing - paths'!
 
 catalinaHome
     "Bit hacky, but..."
@@ -113,7 +134,7 @@
     "Modified: / 13-12-2011 / 14:33:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
 ! !
 
-!JavaUtilities::Tomcat methodsFor:'initialization'!
+!JavaUtilities::Tomcat6x methodsFor:'initialization'!
 
 initializeVM
 
@@ -156,7 +177,7 @@
     "Created: / 18-04-2012 / 08:08:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!JavaUtilities::Tomcat methodsFor:'start/stop'!
+!JavaUtilities::Tomcat6x methodsFor:'start/stop'!
 
 start
 
@@ -178,6 +199,9 @@
     "Created: / 08-12-2011 / 00:32:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+
+
+
 !JavaUtilities class methodsFor:'documentation'!
 
 version_SVN