--- a/DebugView.st	Thu Sep 03 06:56:33 2015 +0200
+++ b/DebugView.st	Fri Sep 04 06:42:45 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -4389,25 +4391,24 @@
     sel := mthd selector.
 
     (cls notNil and:[(cls includesSelector:sel)]) ifTrue:[
-	cls browserClass openInClass:cls selector:sel.
-	^ self
+        cls browserClass openInClass:cls selector:sel.
+        ^ self
     ].
 
     mthd source notEmptyOrNil ifTrue:[
-	(Dialog confirm:'Block''s home method is (no longer) present in any class.\Do you want to see the method anyway?' withCRs)
-	ifTrue:[
-	    UserPreferences current systemBrowserClass
-		browseMethods:{ mthd } title:'Unbound Method' sort:false
-	    "/ TextView openWith:mthd source title:'Unbound Method''s Source'.
-	].
-	^ self
+        (Dialog confirm:'Block''s home method is (no longer) present in any class.\Do you want to see the method anyway?' withCRs)
+        ifTrue:[
+            SystemBrowser default browseMethods:{ mthd } title:'Unbound Method' sort:false
+            "/ TextView openWith:mthd source title:'Unbound Method''s Source'.
+        ].
+        ^ self
     ].
     cls notNil ifTrue:[
-	(Dialog confirm:'Block''s home method is (no longer) present in any class and no source can be shown.\Do you want to browse the method''s last class instead?' withCRs)
-	ifTrue:[
-	    cls browserClass openInClass:cls selector:nil.
-	].
-	^ self
+        (Dialog confirm:'Block''s home method is (no longer) present in any class and no source can be shown.\Do you want to browse the method''s last class instead?' withCRs)
+        ifTrue:[
+            cls browserClass openInClass:cls selector:nil.
+        ].
+        ^ self
     ].
     Dialog information:'Block''s home method is (no longer) present in any class.'.
 !