Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Sun, 03 Apr 2016 21:43:43 +0200
changeset 16262 1b719dfc2813
parent 16261 37d84328738a
child 16263 4cf1214fa57f
#DOCUMENTATION by cg class: DebugView changed: #newDebugger
DebugView.st file | annotate | diff | comparison | revisions 
--- a/DebugView.st	Sun Apr 03 21:41:50 2016 +0200
+++ b/DebugView.st	Sun Apr 03 21:43:43 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -180,8 +182,10 @@
     CachedExclusive := nil.
     OpenDebuggers := nil.
 
+    "/ only assign to the global debugger, if it has not been redefined
+    "/ to another class.
     (Debugger isBehavior and:[Debugger name = #DebugView]) ifTrue:[
-	Debugger := self
+        Smalltalk at:#Debugger put:self
     ].
 
     "
hg/stx-libtool