diff options
| author | Kurt Zenker <kz@openoffice.org> | 2004-05-19 12:23:09 +0000 |
|---|---|---|
| committer | Kurt Zenker <kz@openoffice.org> | 2004-05-19 12:23:09 +0000 |
| commit | 0a4c4818f5e5441322c330afd732e9dd0288d95f (patch) | |
| tree | e926769f9c62a0fd5ae0d8046f697e0a4ac3046f /wizards | |
| parent | d961c4f30847cd88b8091a834f470f591309d184 (diff) | |
INTEGRATION: CWS qwizards1 (1.42.32); FILE MERGED
2004/04/05 14:20:30 bc 1.42.32.3: #111604# Registrypath of Typedetection modified before saving
2003/08/19 15:00:32 bc 1.42.32.2: #110436# bdebug set to false
2003/08/19 14:58:47 bc 1.42.32.1: #110436# maxtextlength of memocontrols now set to 0
Diffstat (limited to 'wizards')
| -rw-r--r-- | wizards/source/formwizard/FormWizard.xba | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/wizards/source/formwizard/FormWizard.xba b/wizards/source/formwizard/FormWizard.xba index 9b863d02fb91..e718613d66e2 100644 --- a/wizards/source/formwizard/FormWizard.xba +++ b/wizards/source/formwizard/FormWizard.xba @@ -348,8 +348,8 @@ Dim sTargetPath as String Dim TypeNames(0,2) as String Dim oMasterKey as Object Dim oTypes() as Object - oMasterKey = GetRegistryKeyContent("org.openoffice.Office.TypeDetection/") - oTypes() = oMasterKey.Filters + oMasterKey = GetRegistryKeyContent("org.openoffice.TypeDetection.Types/") + oTypes() = oMasterKey.Types TypeNames(0,0) = GetFilterName("StarOffice XML (Writer)") TypeNames(0,1) = "*.sxw" TypeNames(0,2) = "" @@ -360,6 +360,7 @@ Dim oTypes() as Object End Sub + Sub EmptyFieldsListboxes() Dim NullList() as String ToggleListboxControls(DialogModel, False) |