--- a/Tools__NewSystemBrowser.st	Thu Aug 22 15:53:39 2013 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Aug 22 15:54:34 2013 +0200
@@ -37007,8 +37007,7 @@
 
     Dialog aboutToOpenBoxNotificationSignal
         handle:[:ex |
-            ex parameter window minExtent:300@300.
-            ex proceed.
+            ex box window minExtent:300@300.
         ] do:[
             class := Dialog
                          choose:(resources string:'Break for (Sub-)Instances of')
@@ -46623,14 +46622,10 @@
 
     generateAccessorsHolder := true asValue.
     Dialog aboutToOpenBoxNotificationSignal handle:[:ex |
-        |box|
-
-        box := ex parameter.
-        box verticalPanel
+        ex box verticalPanel
             add:((CheckBox
                     label:(resources string:'Generate Getters and Setters'))
                     model:generateAccessorsHolder).
-        ex proceed
     ] do:[
         variablesToAdd :=
             Dialog
@@ -58856,15 +58851,15 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1958 2013-08-20 13:57:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1959 2013-08-22 13:54:34 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1958 2013-08-20 13:57:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1959 2013-08-22 13:54:34 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1958 2013-08-20 13:57:08 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.1959 2013-08-22 13:54:34 cg Exp $'
 ! !