From ce97860cea94085f4513d327b6ab505444154036 Mon Sep 17 00:00:00 2001 From: Noel Power Date: Wed, 5 Mar 2003 17:24:11 +0000 Subject: #11984, changed delimiter in script uri to "&", was "+" --- scripting/workben/bindings/ScriptBinding.xba | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) (limited to 'scripting/workben/bindings') diff --git a/scripting/workben/bindings/ScriptBinding.xba b/scripting/workben/bindings/ScriptBinding.xba index 34fc916f945f..04ff383a96b3 100644 --- a/scripting/workben/bindings/ScriptBinding.xba +++ b/scripting/workben/bindings/ScriptBinding.xba @@ -365,7 +365,9 @@ function getScriptURI( selectedScript as String ) as String end if next n - getScriptURI() = "script://" + scriptInfo.getLogicalName + "?language=" + scriptInfo.getLanguage() + "+function=" + scriptInfo.getFunctionName() + "+location=" + location + getScriptURI() = "script://" + scriptInfo.getLogicalName + "?language=" _ + + scriptInfo.getLanguage() + "&function=" + _ + scriptInfo.getFunctionName() + "&location=" + location end function @@ -565,7 +567,11 @@ sub RemoveEventFromDocViaAPI( event as string ) dim args(0) as new com.sun.star.beans.PropertyValue args(0).Name = "" args(0).Value = event - url.Complete = "script://_$ScriptFrmwrkHelper.removeEvent?language=Java+function=ScriptFrmwrkHelper.removeEvent+location=user" + + url.Complete = "script://_$ScriptFrmwrkHelper.removeEvent?" _ + + "language=Java&function=ScriptFrmwrkHelper.removeEvent" _ + + "&location=user" + parser.parseStrict(url) disp = document.queryDispatch(url,"",0) disp.dispatch(url,args()) @@ -700,7 +706,8 @@ Sub UpdateCfgFile ( fileName as String ) args(0) = ThisComponent FuncProvider = createUnoService("drafts.com.sun.star.script.framework.provider.FunctionProvider") FuncProvider.initialize( args() ) - Func = FuncProvider.getFunction("script://_$ScriptFrmwrkHelper.updateCfgFile?language=Java+function=ScriptFrmwrkHelper.updateCfgFile+location=user") + Func = FuncProvider.getFunction("script://_$ScriptFrmwrkHelper.updateCfgFile?" _ + + "language=Java&function=ScriptFrmwrkHelper.updateCfgFile&location=user") Dim inArgs(2) Dim outArgs() Dim outIndex() -- cgit