--- a/Tools__BreakpointBrowser.st	Fri Sep 01 14:26:43 2017 +0200
+++ b/Tools__BreakpointBrowser.st	Fri Sep 01 14:26:47 2017 +0200
@@ -1905,14 +1905,17 @@
 browse
     |browser|
 
-    browser := UserPreferences systemBrowserClass
-        openInClass:(Smalltalk classNamed:className) selector:selector.
+    browser := SystemBrowser default
+                    openInClass:(Smalltalk classNamed:className) 
+                    selector:selector.
 
     lineNumber notNil ifTrue:[
         browser codeView 
             cursorLine:lineNumber col:1;
             selectLine:lineNumber.
     ].
+
+    "Modified: / 01-09-2017 / 14:22:07 / cg"
 !
 
 method