--- a/XWorkstation.st	Fri Apr 04 14:45:49 1997 +0200
+++ b/XWorkstation.st	Fri Apr 04 14:47:25 1997 +0200
@@ -16,7 +16,7 @@
 		hasImageExtension hasInputExtension ignoreBackingStore blackpixel
 		whitepixel protocolsAtom deleteWindowAtom saveYourselfAtom
 		quitAppAtom primaryAtom secondaryAtom cutBuffer0Atom stringAtom
-		lengthAtom listOfXFonts buttonsPressed eventRootX eventRootY
+		lengthAtom wmStateAtom listOfXFonts buttonsPressed eventRootX eventRootY
 		displayName eventTrace dispatchingExpose rgbVisual virtualRootId
 		rootId eventBuffer altModifierMask metaModifierMask
 		multiClickTime'
@@ -6665,6 +6665,11 @@
 #else
 	__INST(lengthAtom) = __MKATOMOBJ( XA_LENGTH );
 #endif
+#ifndef WM_STATE
+	__INST(wmStateAtom) = __MKATOMOBJ( XInternAtom(dpy, "WM_STATE", True) );
+#else
+	__INST(wmStateAtom) = __MKATOMOBJ( WM_STATE );
+#endif
 
 	END_INTERRUPTSBLOCKED
     }
@@ -8633,6 +8638,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.221 1997-04-02 18:46:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.222 1997-04-04 12:47:25 cg Exp $'
 ! !
 XWorkstation initialize!