diff options
author | Andreas Säger <villeroy@t-online.de> | 2017-03-26 23:34:35 +0300 |
---|---|---|
committer | Mike Kaganski <mike.kaganski@collabora.com> | 2017-03-27 04:34:39 +0000 |
commit | ad4857211bcc39ccd4c84c670bfab1b937f65089 (patch) | |
tree | eab59695a62f757d19592e622490027c59a2955c /wizards/source/formwizard/Language.xba | |
parent | 23282b476f094c735ecfae4f82798e36ac9cbbc9 (diff) |
tdf#106529: fix closing parentheses of bundled macros
Change-Id: I43b6d4f97cb3b1cd1426e6aa7e13550d94cb7c51
Signed-off-by: Mike Kaganski <mike.kaganski@collabora.com>
Reviewed-on: https://gerrit.libreoffice.org/35726
Tested-by: Jenkins <ci@libreoffice.org>
Diffstat (limited to 'wizards/source/formwizard/Language.xba')
-rw-r--r-- | wizards/source/formwizard/Language.xba | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/wizards/source/formwizard/Language.xba b/wizards/source/formwizard/Language.xba index 40a0e5893ac0..a175a7d2a46b 100644 --- a/wizards/source/formwizard/Language.xba +++ b/wizards/source/formwizard/Language.xba @@ -64,7 +64,7 @@ Sub LoadLanguage () sMsgErrTitleSuggestedExist = GetResText(RID_COMMON + 10) sMsgErrTitleAsTableExist = GetResText(RID_COMMON + 10) sMsgErrTitleSyntaxError = GetResText(RID_COMMON + 11) - sMsgNoConnection = GetResText(RID_COMMON + 14 + sMsgNoConnection = GetResText(RID_COMMON + 14) sMsgProgressText = GetResText(RID_FORM + 2) sMsgCreatedForm = GetResText(RID_FORM + 26) sMsgErrNameToLong = GetResText (RID_FORM + 27) @@ -129,12 +129,12 @@ Dim slblFields as String .optAlign2.Label = GetResText(RID_FORM + 34) .optAlign0.State = 1 - //FIXME: Remove this unused FNameAddOn through the file + REM//FIXME: Remove this unused FNameAddOn through the file FNameAddOn = "" IDArray = Array(36, 37, 40, 38, 39) For i = 1 To 5 - ButtonHelpText = GetResText(RID_FORM + IDArray(i-1) + ButtonHelpText = GetResText(RID_FORM + IDArray(i-1)) cmdButton = DlgFormDB.getControl("cmdArrange" & i) cmdButton.Model.ImageURL = FormPath & "Arrange_" & i & FNameAddOn & ".gif" cmdButton.Model.HelpText = ButtonHelpText @@ -156,10 +156,10 @@ Dim slblFields as String ' .cmdArrange5.HelpText = GetResText(RID_FORM + 39) sWriterFilterName = GetResText(RID_FORM + 70) End With - DlgFormDB.GetControl("cmdMoveSelected").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 39) - DlgFormDB.GetControl("cmdRemoveSelected").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 40) - DlgFormDB.GetControl("cmdMoveAll").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 41) - DlgFormDB.GetControl("cmdRemoveAll").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 42) + DlgFormDB.GetControl("cmdMoveSelected").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 39)) + DlgFormDB.GetControl("cmdRemoveSelected").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 40)) + DlgFormDB.GetControl("cmdMoveAll").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 41)) + DlgFormDB.GetControl("cmdRemoveAll").getPeer().setProperty("AccessibleName", GetResText(RID_COMMON + 42)) DlgFormDB.getControl("lstFields").getPeer().setProperty("AccessibleName", DeleteStr(slblFields, "~")) DlgFormDB.getControl("lstSelFields").getPeer().setProperty("AccessibleName", DeleteStr(slblSelFields, "~")) |