--- a/WindowEvent.st	Fri Jun 28 09:22:42 2019 +0200
+++ b/WindowEvent.st	Fri Jun 28 09:23:52 2019 +0200
@@ -811,7 +811,7 @@
     ].
 
     aGCOrStream 
-        nextPutAll:self class name;
+        nextPutAll:self className;
         nextPut:$(.
 
     selector storeOn:aGCOrStream. 
@@ -826,6 +826,7 @@
     "Created: / 07-03-1996 / 14:55:50 / cg"
     "Modified: / 20-09-1997 / 11:42:11 / cg"
     "Modified (comment): / 22-02-2017 / 16:53:02 / cg"
+    "Modified: / 28-06-2019 / 09:23:38 / Claus Gittinger"
 ! !
 
 !WindowEvent methodsFor:'private-accessing'!