diff options
Diffstat (limited to 'wizards/source/sfwidgets')
| -rw-r--r-- | wizards/source/sfwidgets/SF_ContextMenu.xba | 2 | ||||
| -rw-r--r-- | wizards/source/sfwidgets/SF_PopupMenu.xba | 6 | ||||
| -rw-r--r-- | wizards/source/sfwidgets/SF_Toolbar.xba | 2 |
3 files changed, 5 insertions, 5 deletions
diff --git a/wizards/source/sfwidgets/SF_ContextMenu.xba b/wizards/source/sfwidgets/SF_ContextMenu.xba index e246c5aeb5d6..0694569cf9c0 100644 --- a/wizards/source/sfwidgets/SF_ContextMenu.xba +++ b/wizards/source/sfwidgets/SF_ContextMenu.xba @@ -482,7 +482,7 @@ Dim MainConfigManager As Object ' com.sun.star.ui.XUIConfigurationManager Try: ' Initialize the dictionary - Set MenuTree = ScriptForge.SF_Services.CreateScriptService("Dictionary") + Set MenuTree = ScriptForge.SF_Services.CreateScriptService("Dictionary", True) ' with case-sensitive comparison of keys ' Identify the container of the menu tree ' The container is taken either from the system configuration manager of from the local (= in document) one diff --git a/wizards/source/sfwidgets/SF_PopupMenu.xba b/wizards/source/sfwidgets/SF_PopupMenu.xba index 50b28cab9fa1..467e3f748776 100644 --- a/wizards/source/sfwidgets/SF_PopupMenu.xba +++ b/wizards/source/sfwidgets/SF_PopupMenu.xba @@ -710,10 +710,10 @@ Public Sub _Initialize(ByRef poPeer As Object _ ''' plXPos, plYPos: the coordinates Try: - ' Initialize the dictionaries + ' Initialize the dictionaries (with case-sensitive comparison of keys) With ScriptForge.SF_Services - Set MenuTree = .CreateScriptService("Dictionary") - Set MenuIdentification = .CreateScriptService("Dictionary") + Set MenuTree = .CreateScriptService("Dictionary", True) + Set MenuIdentification = .CreateScriptService("Dictionary", True) End With ' Initialize the root of the menu tree diff --git a/wizards/source/sfwidgets/SF_Toolbar.xba b/wizards/source/sfwidgets/SF_Toolbar.xba index 1cfbc9301753..1f8329ed1423 100644 --- a/wizards/source/sfwidgets/SF_Toolbar.xba +++ b/wizards/source/sfwidgets/SF_Toolbar.xba @@ -372,7 +372,7 @@ Try: ' Force the visibility of the toolbar Visible = True - Set _ToolbarButtons = ScriptForge.SF_Services.CreateScriptService("ScriptForge.Dictionary") + Set _ToolbarButtons = ScriptForge.SF_Services.CreateScriptService("ScriptForge.Dictionary", True) ' with case-sensitive comparison of keys Set oElement = _LayoutManager.getElement(_ResourceURL) Set oSettings = oElement.getSettings(True) |