diff options
author | Duncan Foster <dfoster@openoffice.org> | 2003-03-06 14:34:30 +0000 |
---|---|---|
committer | Duncan Foster <dfoster@openoffice.org> | 2003-03-06 14:34:30 +0000 |
commit | 52a4f826196468e65bb4aa87ccbd2592de8770a5 (patch) | |
tree | adfe00b89ff0e9545ddd775e498e96dc66aeb6c4 /scripting/workben/bindings | |
parent | 77f15a5f749cb8edad76603d53c6e08db49acbc4 (diff) |
#i12091#
Pass extra arg to creation of FunctionProvider to prevent security dialogs from appearing.
Diffstat (limited to 'scripting/workben/bindings')
-rw-r--r-- | scripting/workben/bindings/ScriptBinding.xba | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/scripting/workben/bindings/ScriptBinding.xba b/scripting/workben/bindings/ScriptBinding.xba index 109c71984963..7ca53bd137ec 100644 --- a/scripting/workben/bindings/ScriptBinding.xba +++ b/scripting/workben/bindings/ScriptBinding.xba @@ -731,8 +731,12 @@ end Sub Sub UpdateCfgFile ( fileName as String ) dim FuncProvider as Object dim Func as Object - dim args(0) + dim args(1) + dim displayDialogFlag as boolean + displayDialogFlag = false args(0) = ThisComponent + args(1) = displayDialogFlag + FuncProvider = createUnoService("drafts.com.sun.star.script.framework.provider.FunctionProvider") FuncProvider.initialize( args() ) Func = FuncProvider.getFunction("script://_$ScriptFrmwrkHelper.updateCfgFile?" _ @@ -1771,4 +1775,4 @@ end sub sub HelpOKButton() helpDialog.endExecute() end sub -</script:module>
\ No newline at end of file +</script:module> |