summaryrefslogtreecommitdiff
path: root/wizards
diff options
context:
space:
mode:
Diffstat (limited to 'wizards')
-rw-r--r--wizards/source/access2base/CommandBar.xba1
-rw-r--r--wizards/source/access2base/DoCmd.xba2
-rw-r--r--wizards/source/access2base/UtilProperty.xba2
3 files changed, 3 insertions, 2 deletions
diff --git a/wizards/source/access2base/CommandBar.xba b/wizards/source/access2base/CommandBar.xba
index 93bc884383e1..ed7955d3cef1 100644
--- a/wizards/source/access2base/CommandBar.xba
+++ b/wizards/source/access2base/CommandBar.xba
@@ -170,6 +170,7 @@ Dim oObject As Object
Set oObject = New Collect
oObject._CollType = COLLCOMMANDBARCONTROLS
oObject._ParentType = OBJCOMMANDBAR
+ oObject._ParentName = _Name
oObject._Count = iItemsCount
Case Else ' pvIndex is numeric
Goto Trace_IndexError
diff --git a/wizards/source/access2base/DoCmd.xba b/wizards/source/access2base/DoCmd.xba
index 54156558a5c8..261aa26b5ce8 100644
--- a/wizards/source/access2base/DoCmd.xba
+++ b/wizards/source/access2base/DoCmd.xba
@@ -2466,4 +2466,4 @@ Dim oShell As Object
oShell.execute(sCommand, "" , com.sun.star.system.SystemShellExecuteFlags.DEFAULTS)
End Sub ' _ShellExecute V0.8.5
-</script:module>
+</script:module> \ No newline at end of file
diff --git a/wizards/source/access2base/UtilProperty.xba b/wizards/source/access2base/UtilProperty.xba
index 4f96ab8c9e85..b26555054aa2 100644
--- a/wizards/source/access2base/UtilProperty.xba
+++ b/wizards/source/access2base/UtilProperty.xba
@@ -180,4 +180,4 @@ Dim sName As String, vValue As Variant
_PropValuesToStr() = sResult
End Function &apos; _PropValuesToStr V1.3.0
-</script:module>
+</script:module> \ No newline at end of file