--- a/JavaUtilities.st	Thu Jan 10 17:48:13 2013 +0000
+++ b/JavaUtilities.st	Thu Jan 10 17:50:21 2013 +0000
@@ -203,15 +203,24 @@
 
 start
 
+    | notifier |
+
     self setup.
 
+    notifier := (Java classForName: 'stx.libjava.tomcat.StartupNotifier').
+
+
     [
-    (Java classForName: 'org.apache.catalina.startup.Bootstrap')
+        (Java classForName: 'org.apache.catalina.startup.Bootstrap')
         perform: #'main([Ljava/lang/String;)V'
-        with: ((Java classForName:'java.lang.String') javaArrayClass with:(Java as_String:'start'))
+        with: ((Java classForName:'java.lang.String') javaArrayClass with:(Java as_String:'start')).
     ] fork.
 
+    notifier waitUntilStarted.
+    Transcript showCR: '== TomCat ready!! =='
+
     "Created: / 07-12-2011 / 23:59:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 10-01-2013 / 16:55:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 stop