summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
authorBehrend Cornelius <bc@openoffice.org>2001-06-21 13:54:50 +0000
committerBehrend Cornelius <bc@openoffice.org>2001-06-21 13:54:50 +0000
commitb62b409aa5f82f5997b96b051eba350a79e8be43 (patch)
tree1fd6be611c52f707d0e9c4a5fffde520a60b8418 /wizards
parent7a47e72c044da7d3a41148cbb721936ca5940f06 (diff)
#88615# Dialog changed to modal
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/importwizard/Main.xba8
1 files changed, 4 insertions, 4 deletions
diff --git a/wizards/source/importwizard/Main.xba b/wizards/source/importwizard/Main.xba
index 7ba8e8b25ba7..eb77d97de2fe 100644
--- a/wizards/source/importwizard/Main.xba
+++ b/wizards/source/importwizard/Main.xba
@@ -9,7 +9,7 @@ Public HeaderPreviews(4) as Object
Public ImportDialog as Object
Public ImportDialogArea as Object
Public bSetFonts as Boolean
-&apos; If the ProgressPage ist already on Top The Dialog will be immediately closed when this flag is
+&apos; If the ProgressPage ist already on Top The Dialog will be immediately closed when this flag is
&apos; set to False
Public bCallCancelMsg as Boolean
@@ -37,7 +37,7 @@ Sub Main()
FillStep_Welcome()
RepaintHeaderPreview()
SetStates()
- ImportDialogArea.SetVisible(True) &apos;Execute()
+ ImportDialogArea.Execute()
ImportDialog.cbGoOn.DefaultButton = True
Exit Sub
RTError:
@@ -86,7 +86,7 @@ Dim iCurStep as Integer
End Select
Case 4
End Select
- ImportDialog.cbGoOn.DefaultButton = True
+ ImportDialog.cbGoOn.DefaultButton = True
Exit Sub
RTError:
Msgbox sRTErrorDesc, 16, sRTErrorHeader
@@ -98,7 +98,7 @@ Dim iCurStep as Integer
If Not bDebugWizard Then
On Error Goto RTError
End If
- bCallCancelMsg = False
+ bCallCancelMsg = False
iCurStep = ImportDialog.Step
Select Case iCurStep
Case 4