diff options
author | Tom Verbeek <tv@openoffice.org> | 2001-11-12 14:24:05 +0000 |
---|---|---|
committer | Tom Verbeek <tv@openoffice.org> | 2001-11-12 14:24:05 +0000 |
commit | f3c91eaec4482b75277fcbf9f0d932b31e8570e6 (patch) | |
tree | bbbba4d71dfca66b0a4ee35b789d4cf362f07b40 /wizards/source/template/Correspondence.xba | |
parent | 00d166ff50c8b95d5a21851285bb4624791bfc1a (diff) |
#92952# StarDesktop.ActiveFrame.Controller.Model --> ThisComponent
Diffstat (limited to 'wizards/source/template/Correspondence.xba')
-rw-r--r-- | wizards/source/template/Correspondence.xba | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/template/Correspondence.xba b/wizards/source/template/Correspondence.xba index 56b3b51a11e4..41686edbb1eb 100644 --- a/wizards/source/template/Correspondence.xba +++ b/wizards/source/template/Correspondence.xba @@ -93,7 +93,7 @@ Dim oDocSettings as Object DialogExited = TRUE ParaBreak = com.sun.star.text.ControlCharacter.PARAGRAPH_BREAK - oDocument = StarDesktop.ActiveFrame.Controller.Model + oDocument = ThisComponent If bDBFields Then 'set the address db as current db at the document oDocSettings = oDocument.createInstance("com.sun.star.document.Settings") @@ -247,4 +247,4 @@ Dim bCorrectField as Boolean End If End If End Sub -</script:module>
\ No newline at end of file +</script:module> |