diff options
author | Duncan Foster <dfoster@openoffice.org> | 2003-05-29 14:31:20 +0000 |
---|---|---|
committer | Duncan Foster <dfoster@openoffice.org> | 2003-05-29 14:31:20 +0000 |
commit | 51aa713baa7cac8aca05555cdcb0a939c3dd5d03 (patch) | |
tree | 37aa56d7c0be0b604a6691219e2e59e1f9ebbc85 /scripting/workben | |
parent | 9e95c73731846d05fa69a1a56e8fa8fb2fa7e446 (diff) |
#i13211# Fixed Events list.
Diffstat (limited to 'scripting/workben')
-rw-r--r-- | scripting/workben/bindings/ScriptBinding.xba | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/scripting/workben/bindings/ScriptBinding.xba b/scripting/workben/bindings/ScriptBinding.xba index 14a04fc07025..34f47230496a 100644 --- a/scripting/workben/bindings/ScriptBinding.xba +++ b/scripting/workben/bindings/ScriptBinding.xba @@ -1276,6 +1276,9 @@ sub populateEventList( focusPosition as integer ) for n = 0 to ubound( allEventTypes() ) ' If the line number is 1 then SB macro ' more than 1 it is the line number of the script + if isApp and n > 12 then + exit for + endif if isApp then lineNumber = allEventTypesApp( n ).Value scriptName = allEventTypesApp( n ).Name @@ -1359,10 +1362,11 @@ sub createAllEventTypes() allEventTypes( 11 ).Value = "DeActivate document" allEventTypes( 12 ).Name = "OnPrint" allEventTypes( 12 ).Value = "Print Document" - allEventTypes( 13 ).Name = "OnError" - allEventTypes( 13 ).Value = "JavaScript Error" - allEventTypes( 14 ).Name = "OnNewMail" - allEventTypes( 14 ).Value = "Message received" + REM The following are document-only events + allEventTypes( 13 ).Name = "on-mail-merge" + allEventTypes( 13 ).Value = "Print form letters" + allEventTypes( 14 ).Name = "page-count-change" + allEventTypes( 14 ).Value = "Changing the page count" end sub |