AbstractLauncherApplication.st
changeset 8643 e69b9268f450
parent 8625 40edf78ff6aa
child 8680 67c4eaab32cf
--- a/AbstractLauncherApplication.st	Sun Jun 07 12:16:37 2009 +0200
+++ b/AbstractLauncherApplication.st	Sun Jun 07 12:17:23 2009 +0200
@@ -904,6 +904,7 @@
 
 bugReporterAvailable
     ^ BugGUI notNil
+    or:[ Expecco::ExpeccoNetAPI notNil ]
 !
 
 hasPDALauncher
@@ -1616,9 +1617,16 @@
 !
 
 startBugMessages
-    "open the SUnit test runner"
-
-    self openApplication:#BugGUI
+    "open the bug reporter"
+
+    Expecco::ExpeccoNetAPI notNil ifTrue:[
+        Expecco::ExpeccoNetAPI reportCodeReview.
+        ^ self
+    ].
+
+    BugGUI notNil ifTrue:[
+        self openApplication:#BugGUI
+    ].
 
     "Modified: / 17.10.1998 / 14:38:18 / cg"
 !
@@ -6680,5 +6688,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.375 2009-05-13 07:51:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.376 2009-06-07 10:17:23 cg Exp $'
 ! !