--- a/CompactHierarchicalItem.st	Wed May 04 18:55:02 2016 +0200
+++ b/CompactHierarchicalItem.st	Wed May 04 19:09:04 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1999 by eXept Software AG
               All Rights Reserved
@@ -244,7 +242,7 @@
 
     encodedEx := (expanded ifTrue:[MaskExpanded] ifFalse:[0]).
 
-    (w == nil) ifTrue:[
+    (w isNil) ifTrue:[
         encodedW := MaskWidth
     ] ifFalse:[
         (w between:0 and:MaskWidth-1) ifTrue:[
@@ -254,7 +252,7 @@
             ^ self.
         ]
     ].
-    (h == nil) ifTrue:[
+    (h isNil) ifTrue:[
         encodedH := MaskHeight
     ] ifFalse:[
         (h between:0 and:MaskHeight-1) ifTrue:[
@@ -338,11 +336,11 @@
 !CompactHierarchicalItem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CompactHierarchicalItem.st,v 1.4 2015-05-03 08:12:44 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/CompactHierarchicalItem.st,v 1.4 2015-05-03 08:12:44 cg Exp $'
+    ^ '$Header$'
 ! !