--- a/Tools__VisualProfilerCanvas.st	Sun Aug 25 12:11:09 2019 +0200
+++ b/Tools__VisualProfilerCanvas.st	Sun Aug 25 14:53:07 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague
               All Rights Reserved
@@ -883,7 +885,7 @@
 !VisualProfilerCanvas::CallTreeItem class methodsFor:'documentation'!
 
 version
-    ^'$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.10 2014-11-10 22:34:53 cg Exp $'
+    ^'$Header$'
 ! !
 
 !VisualProfilerCanvas::CallTreeItem class methodsFor:'instance creation'!
@@ -1054,7 +1056,7 @@
     [rawChildren isEmpty] whileFalse:[
         | childToMerge childrenToMerge |
 
-        childToMerge := mergedChildren add:(rawChildren removeFirst).
+        mergedChildren add:(childToMerge := rawChildren removeFirst).
         childrenToMerge := rawChildren select:[:e|e shouldBeMergedWith:childToMerge] as: OrderedCollection.
         rawChildren removeAll: childrenToMerge.
         childrenToMerge do:[:e|childToMerge subjects addAll:e subjects].
@@ -1081,14 +1083,14 @@
 !VisualProfilerCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.10 2014-11-10 22:34:53 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.10 2014-11-10 22:34:53 cg Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: Tools__VisualProfilerCanvas.st,v 1.10 2014-11-10 22:34:53 cg Exp $'
+    ^ '$Id$'
 ! !