--- a/WinWorkstation.st	Thu Mar 31 16:50:33 2005 +0200
+++ b/WinWorkstation.st	Fri Apr 01 14:56:29 2005 +0200
@@ -15324,6 +15324,23 @@
 %}
 !
 
+setForegroundWindow2:aWindowId
+    "make a window the foreground window"
+
+%{  /* NOCONTEXT */
+    if (__isExternalAddress(aWindowId)) {
+	HWND win = _HWNDVal(aWindowId);
+
+	if (win) {
+	    ShowWindow(win, SW_SHOW);
+	    SetForegroundWindow(win);
+	    BringWindowToTop(win);
+	}
+	RETURN ( self );
+    }
+%}
+!
+
 configureWindow:aWindowId sibling:siblingId stackMode:modeSymbol
     "configure stacking operation of aWindowId w.r.t siblingId"
 
@@ -16446,7 +16463,7 @@
 !WinWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.302 2005-03-17 12:57:21 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WinWorkstation.st,v 1.303 2005-04-01 12:56:28 cg Exp $'
 ! !
 
 WinWorkstation initialize!