summaryrefslogtreecommitdiff
path: root/scripting/workben
diff options
context:
space:
mode:
authorNoel Power <npower@openoffice.org>2003-03-13 06:56:07 +0000
committerNoel Power <npower@openoffice.org>2003-03-13 06:56:07 +0000
commit5ce3eca124ad6dfb0a24d87078d687eff932b2ad (patch)
treef5e4abbda318d3064636bf584ca32be22953f4ce /scripting/workben
parentcfca72516976d09266b2eec775383c802d6b9278 (diff)
#Bug 12136 12135 Code review rework & Format menu issues
Diffstat (limited to 'scripting/workben')
-rw-r--r--scripting/workben/bindings/ScriptBinding.xba14
1 files changed, 8 insertions, 6 deletions
diff --git a/scripting/workben/bindings/ScriptBinding.xba b/scripting/workben/bindings/ScriptBinding.xba
index 7ca53bd137ec..acc932a3b30c 100644
--- a/scripting/workben/bindings/ScriptBinding.xba
+++ b/scripting/workben/bindings/ScriptBinding.xba
@@ -572,9 +572,10 @@ sub WriteEventsToDoc()
endif
&apos;Otherwise it is a StarBasic binding - leave alone
next n
-
+ &apos;Mark document as modified ( should happen automatically as a result of calling the API )
+ ThisComponent.CurrentController.getModel().setModified( True )
exit sub
-
+
ErrorHandler:
reset
msgbox( &quot;Error calling UNO API for writing event bindings to the document&quot; )
@@ -1003,7 +1004,7 @@ sub PopulateScriptList( lang as String, loc as String )
if ( lang = implementations( n ).getLanguage() ) then
if ( detailedView ) then
tempDisplayList( n ).Name = logicalName _
- + &quot; [&quot; + logicalName + &quot;]&quot;
+ + &quot; [&quot; + implementations( n ).getFunctionName() + &quot;]&quot;
tempDisplayList( n ).Value = implementations( n )
else
tempDisplayList( n ).Name = logicalName
@@ -1083,8 +1084,9 @@ sub PopulateSubMenuList( menuItemPosition as integer )
subMenuList.removeItems( 0, subMenuList.getItemCount() )
&apos;If there are no sub-menus i.e. a dynamically generated menu like Format
- if subMenuCount = 1 then
- subMenuList.addItem( &quot;Unable to Assign Scripts to this menu&quot;, 0 )
+ &apos;if subMenuCount = 1 then
+ if menuItems( menuItemPosition ) = &quot;Format&quot; then
+ subMenuList.addItem( &quot;Unable to Assign Scripts to this menu&quot;, 0 )
else
for n = 1 to subMenuCount - 1
subMenuList.addItem( subMenuItems( n ), n - 1 )
@@ -1775,4 +1777,4 @@ end sub
sub HelpOKButton()
helpDialog.endExecute()
end sub
-</script:module>
+</script:module> \ No newline at end of file