diff options
author | Oliver Bolte <obo@openoffice.org> | 2009-02-12 14:03:59 +0000 |
---|---|---|
committer | Oliver Bolte <obo@openoffice.org> | 2009-02-12 14:03:59 +0000 |
commit | 20cea29aa241c198cfbd6cdda9f4cf198e6933bd (patch) | |
tree | 16b877dc84dbf8eff62614606d8f145d8cc2e9d7 /wizards/source/tutorials | |
parent | bbef3ea39fc3fe0bed5bc6307e396fd434e02296 (diff) |
CWS-TOOLING: integrate CWS fwk99
2009-01-20 17:39:31 +0100 pb r266605 : fix: #i98280# new 'More templates'-URL
2009-01-15 20:17:58 +0100 mst r266391 : #i95702# convert wizards to DocumentProperties (partially based on patch by cmc)
2009-01-12 07:35:44 +0100 pb r266131 : fix: #i96851# HID_PASTE_DLG and HID_LINKDLG_TABLB added
2009-01-09 10:40:48 +0100 pb r266061 : fix: #i97386# Execute_Impl() while sub-dialog is open this could be deleted; #i68415# patch from cmc
2009-01-09 10:35:24 +0100 pb r266059 : fix: #i97386# struct Deleted added
2009-01-09 10:05:17 +0100 pb r266057 : fix: #i97365# ModalDialog RID_SVXPAGE_IMPROVEMENT removed
2009-01-09 10:02:39 +0100 pb r266056 : fix: #i97841# new: set InfoURL and HandleHyperLink()
2009-01-09 09:59:13 +0100 pb r266053 : fix: #i97391# MinWidth re-calculated; #i97365# SvxImprovementDialog2 removed
2009-01-09 09:55:00 +0100 pb r266051 : fix: #i97841# new: HandleHyperLink(); #i97365# SvxImprovementDialog2 removed
2009-01-06 14:24:24 +0100 cd r265921 : #i96831# Fix build problem with gcc 4.3.2 using the return value of link correctly.
2009-01-06 12:18:41 +0100 cd r265907 : #i96831# Fix build problem with gcc 4.3.2
2009-01-06 12:02:59 +0100 mst r265905 : fix #i97775#
- xmloff/source/core/nmspmap.cxx:
+ SvXMLNamespaceMap::GetQNameByKey does not handle default namespace
correctly
Diffstat (limited to 'wizards/source/tutorials')
-rw-r--r-- | wizards/source/tutorials/Functions.xba | 22 |
1 files changed, 10 insertions, 12 deletions
diff --git a/wizards/source/tutorials/Functions.xba b/wizards/source/tutorials/Functions.xba index 55420d860a5b..6524ec19338c 100644 --- a/wizards/source/tutorials/Functions.xba +++ b/wizards/source/tutorials/Functions.xba @@ -39,8 +39,8 @@ Sub LoadTutorialDialog(exampleToUse, documentTYP) SetTutorialDocumentPosSize() - documentInfo = ThisComponent.getDocumentInfo() - myDialog.Title = "Tutorials - " & documentInfo.Title + documentProps = ThisComponent.getDocumentProperties() + myDialog.Title = "Tutorials - " & documentProps.Title oTextField = myDialog.GetControl("myTextField") oTextField.setVisible(False) @@ -143,18 +143,16 @@ Sub Init End Sub Sub InitStep - userFieldName = ThisComponent.getDocumentInfo.getUserFieldName(0) - ResultString = InStr (userFieldName, "CurrentStep:") - If ResultString <> 0 Then - TutorStep = Val(ThisComponent.getDocumentInfo.getUserFieldValue(0)) - Else - ThisComponent.getDocumentInfo.setUserFieldName(0, "CurrentStep:") - ThisComponent.getDocumentInfo.setUserFieldValue(0, TutorStep) - End If + udProps = ThisComponent.DocumentProperties.UserDefinedProperties + If udProps.PropertySetInfo.hasPropertyByName("CurrentStep") Then + TutorStep = udProps.CurrentStep + Else + udProps.addProperty("CurrentStep", 0, TutorStep) + End If End Sub Sub setStep - ThisComponent.getDocumentInfo.setUserFieldValue(0, TutorStep) + ThisComponent.DocumentProperties.UserDefinedProperties.CurrentStep = TutorStep End Sub Sub InitAction() @@ -367,4 +365,4 @@ Sub ExitTutorial() msgBox "Error! Cannot close document." End If End Sub -</script:module>
\ No newline at end of file +</script:module> |