--- a/XWorkstation.st	Fri May 24 03:27:15 2019 +0000
+++ b/XWorkstation.st	Fri May 24 12:42:22 2019 +0200
@@ -19,13 +19,14 @@
 	instanceVariableNames:'hasShapeExtension hasShmExtension hasDPSExtension
 		hasMbufExtension hasXVideoExtension hasSaveUnder hasPEXExtension
 		hasImageExtension hasInputExtension hasXineramaExtension
-		hasRenderExtension hasXTestExtension hasXftLibrary ignoreBackingStore blackpixel
-		whitepixel atoms protocolsAtom deleteWindowAtom saveYourselfAtom
-		quitAppAtom primaryAtom clipboardAtom stringAtom wmStateAtom
-		motifWMHintsAtom listOfXFonts buttonsPressed eventRootX
-		eventRootY displayName eventTrace dispatchingExpose rgbVisual
-		rgbaVisual virtualRootId rootId altModifierMask metaModifierMask
-		lastEventTime rawMonitorBounds monitorBounds lastButtonPressTime
+		hasRenderExtension hasXTestExtension hasXftLibrary
+		ignoreBackingStore blackpixel whitepixel atoms protocolsAtom
+		deleteWindowAtom saveYourselfAtom quitAppAtom primaryAtom
+		clipboardAtom stringAtom wmStateAtom motifWMHintsAtom
+		listOfXFonts buttonsPressed eventRootX eventRootY displayName
+		eventTrace dispatchingExpose rgbVisual rgbaVisual virtualRootId
+		rootId altModifierMask metaModifierMask lastEventTime
+		rawMonitorBounds monitorBounds lastButtonPressTime
 		lastButtonPressPosition deviceIOTimeoutErrorSignal
 		activateOnClick rawKeySymTranslation clipboardSelectionTime
 		primarySelectionTime selectionFetchers selectionHandlers
@@ -13086,23 +13087,28 @@
 
     activeWindowAtom := self atomIDOf:#'_NET_ACTIVE_WINDOW' create:false.
     activeWindowAtom notNil ifTrue:[
-	self
-	    sendClientEvent:activeWindowAtom
-	    format:32
-	    to:(self rootWindowId)
-	    propagate:false
-	    eventMask:((self eventMaskFor:#substructureNotify) bitOr:(self eventMaskFor:#substructureRedirect))
-	    window:aWindowId
-	    data1:2                 "activate request from pager. This is a trick: kwm ignores requests from applications (1)"
-	    data2:nil
-	    data3:nil
-	    data4:nil
-	    data5:nil.
+        self
+            sendClientEvent:activeWindowAtom
+            format:32
+            to:(self rootWindowId)
+            propagate:false
+            eventMask:((self eventMaskFor:#substructureNotify) bitOr:(self eventMaskFor:#substructureRedirect))
+            window:aWindowId
+            data1:2                 "activate request from pager. This is a trick: kwm ignores requests from applications (1)"
+            data2:nil
+            data3:nil
+            data4:nil
+            data5:nil.
+    ] ifFalse:[
+        "/ fallback    
+        self raiseWindowToTop:aWindowId.
     ].
 
     "
       Transcript topView setForegroundWindow
     "
+
+    "Modified (format): / 24-05-2019 / 12:39:58 / Stefan Vogel"
 !
 
 setIconName:aString in:aWindowId