--- a/DebugView.st	Sun Sep 30 01:33:44 2012 +0200
+++ b/DebugView.st	Sun Sep 30 02:29:17 2012 +0200
@@ -4786,9 +4786,10 @@
 !
 
 hideSupportCode
-    ^ hideSupportCode
-
-    "Created: / 10-06-2012 / 21:27:02 / cg"
+    hideSupportCode := true.
+    self redisplayBacktrace.
+
+    "Created: / 10-06-2012 / 21:27:53 / cg"
 !
 
 hideSupportCode:aBoolean
@@ -6570,7 +6571,6 @@
         withSearchCursorDo:
       ) includes:sel)
         ifTrue:[
-Transcript showCR:mthdClass.
             (mthdClass == TopView) ifTrue:[^ false].
             (mthdClass == ApplicationModel) ifTrue:[^ false].
             (mthdClass == WindowGroup) ifTrue:[^ false].
@@ -7998,11 +7998,11 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.556 2012-09-26 13:10:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.557 2012-09-30 00:29:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.556 2012-09-26 13:10:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.557 2012-09-30 00:29:17 cg Exp $'
 !
 
 version_SVN