diff options
| author | Behrend Cornelius <bc@openoffice.org> | 2001-10-08 08:52:01 +0000 |
|---|---|---|
| committer | Behrend Cornelius <bc@openoffice.org> | 2001-10-08 08:52:01 +0000 |
| commit | b1bf36532e74eb1498bd2fe906c4be34de051e56 (patch) | |
| tree | 882187074581268bbd05def03a51c3e765144ad0 /wizards/source/gimmicks/ReadDir.xba | |
| parent | 02c04d0f25cb20aecb08b008732dbf13600e8549 (diff) | |
#92590# english Texts of macros now improved
Diffstat (limited to 'wizards/source/gimmicks/ReadDir.xba')
| -rw-r--r-- | wizards/source/gimmicks/ReadDir.xba | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/wizards/source/gimmicks/ReadDir.xba b/wizards/source/gimmicks/ReadDir.xba index b5184d8c8547..223249d3ed50 100644 --- a/wizards/source/gimmicks/ReadDir.xba +++ b/wizards/source/gimmicks/ReadDir.xba @@ -47,13 +47,13 @@ Dim oStandardTemplate as Object BasicLibraries.LoadLibrary("Tools") oDocument = StarDesktop.LoadComponentFromURL("private:factory/sdraw","_blank",0, NoArgs()) oPage = oDocument.DrawPages(0) - oStandardTemplate = oDocument.StyleFamilies.GetByName("graphics").GetByName("Standard") + oStandardTemplate = oDocument.StyleFamilies.GetByName("graphics").GetByName("Default") oStandardTemplate.CharHeight = 10 oStandardTemplate.TextLeftDistance = 100 oStandardTemplate.TextRightDistance = 100 oStandardTemplate.TextUpperDistance = 50 oStandardTemplate.TextLowerDistance = 50 - DlgReadDir = LoadDialog("Gimmicks","ReadDirDlg") + DlgReadDir = LoadDialog("Gimmicks","ReadDirdlg") oProgressBar = DlgReadDir.Model.ProgressBar1 DlgReadDir.Model.TextField1.Text = ConvertFromUrl(GetPathSettings("Work")) DlgReadDir.Model.cmdGoOn.DefaultButton = True |