--- a/PluginSupport.st	Wed Dec 21 21:10:57 2005 +0100
+++ b/PluginSupport.st	Wed Dec 21 23:38:16 2005 +0100
@@ -48,37 +48,6 @@
 "
 ! !
 
-!PluginSupport class methodsFor:'support'!
-
-setPluginWindowHandle:windowId
-%{
-    extern void __pluginSetWindow();
-#   define HWND         void *
-#   define _HWNDVal(o)  (HWND)(__MKCP(o))
-
-    if (__isExternalAddress(windowId)) {
-	HWND hWnd = _HWNDVal(windowId);
-	__pluginSetWindow(hWnd);
-    }
-%}.
-!
-
-getBrowserWindowWidth
-%{
-    extern int __pluginGetBrowserWindowWidth();
-
-    RETURN (__mkSmallInteger(__pluginGetBrowserWindowWidth()));
-%}.
-!
-
-getBrowserWindowHeight
-%{
-    extern int __pluginGetBrowserWindowHeight();
-
-    RETURN (__mkSmallInteger(__pluginGetBrowserWindowHeight()));
-%}.
-! !
-
 !PluginSupport class methodsFor:'startup'!
 
 start:anApplicationClass inWindowWithID:windowID parameters:parameters
@@ -106,10 +75,12 @@
 !
 
 startInBrowserWithWindowID:windowID parameters:parameters
+    parameters infoPrintCR.
+
     self
-	start:(WorkspaceApplication ? Workspace)
-	inWindowWithID:windowID
-	parameters:parameters
+        start:(WorkspaceApplication ? Workspace)
+        inWindowWithID:windowID
+        parameters:parameters
 
     "
      |v|
@@ -131,8 +102,39 @@
     "
 ! !
 
+!PluginSupport class methodsFor:'support'!
+
+getBrowserWindowHeight
+%{
+    extern int __pluginGetBrowserWindowHeight();
+
+    RETURN (__mkSmallInteger(__pluginGetBrowserWindowHeight()));
+%}.
+!
+
+getBrowserWindowWidth
+%{
+    extern int __pluginGetBrowserWindowWidth();
+
+    RETURN (__mkSmallInteger(__pluginGetBrowserWindowWidth()));
+%}.
+!
+
+setPluginWindowHandle:windowId
+%{
+    extern void __pluginSetWindow();
+#   define HWND         void *
+#   define _HWNDVal(o)  (HWND)(__MKCP(o))
+
+    if (__isExternalAddress(windowId)) {
+	HWND hWnd = _HWNDVal(windowId);
+	__pluginSetWindow(hWnd);
+    }
+%}.
+! !
+
 !PluginSupport class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/PluginSupport.st,v 1.8 2005-12-21 20:10:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/PluginSupport.st,v 1.9 2005-12-21 22:38:16 cg Exp $'
 ! !

--- a/Smalltalk.st	Wed Dec 21 21:10:57 2005 +0100
+++ b/Smalltalk.st	Wed Dec 21 23:38:16 2005 +0100
@@ -2442,7 +2442,10 @@
 
     idx := CommandLineArguments indexOf:'--browserParameters:'.
     idx ~~ 0 ifTrue:[
-        params := CommandLineArguments copyFrom:idx+1
+        params := Dictionary new.
+        (CommandLineArguments copyFrom:idx+1) pairWiseDo:[:key :value |
+            params at:key put:value.
+        ].
     ].
 
     'browserWindow is: ' errorPrint. windowID errorPrintCR.
@@ -6574,5 +6577,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.702 2005-12-21 18:42:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.703 2005-12-21 22:37:54 cg Exp $'
 ! !