--- a/Explainer.st	Fri Nov 23 13:26:33 2012 +0100
+++ b/Explainer.st	Thu Dec 13 00:01:30 2012 +0100
@@ -588,7 +588,7 @@
         ^ stringText , ': an instance variable inherited from ' , clsName , '.'
     ].
 
-    string bitsPerCharacter == 8 ifTrue:[
+    string isWideString ifFalse:[
         "classvars"
         c := parser inWhichClassIsClassVar:string.
         c notNil ifTrue:[
@@ -1455,9 +1455,9 @@
 !Explainer class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.113 2012-10-24 13:08:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.114 2012-12-12 23:01:30 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.113 2012-10-24 13:08:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Explainer.st,v 1.114 2012-12-12 23:01:30 stefan Exp $'
 ! !