helpauthoring/HelpAuthoring/OtherElements.xba | 2 +- helpauthoring/HelpAuthoring/Validate.xba | 10 ++++++---- 2 files changed, 7 insertions(+), 5 deletions(-)
New commits: commit 2ddad0eafa26b96fb455eea5245a145e7346ca55 Author: Yousuf Philips <philip...@hotmail.com> Date: Sun Sep 13 16:36:49 2015 +0400 Dont display unnecessary dialogs Change-Id: Ica0bc38bd23f298ce3e44e2d1bb8db0acf2c7a62 Reviewed-on: https://gerrit.libreoffice.org/18531 Reviewed-by: Jan Holesovsky <ke...@collabora.com> Tested-by: Jan Holesovsky <ke...@collabora.com> diff --git a/helpauthoring/HelpAuthoring/OtherElements.xba b/helpauthoring/HelpAuthoring/OtherElements.xba index e718ac2..c93bc81 100644 --- a/helpauthoring/HelpAuthoring/OtherElements.xba +++ b/helpauthoring/HelpAuthoring/OtherElements.xba @@ -416,7 +416,7 @@ Sub ToggleParaL10NStatus If (sID = "") Then - msgbox "Paragraph has no ID. Assigning ID.",48,"Info" + 'msgbox "Paragraph has no ID. Assigning ID.",48,"Info" InsertNewParaData thiscomponent.getcurrentcontroller.select(oSel(0)) arParaData = GetParaData diff --git a/helpauthoring/HelpAuthoring/Validate.xba b/helpauthoring/HelpAuthoring/Validate.xba index 70e07a7..4e24ecd 100644 --- a/helpauthoring/HelpAuthoring/Validate.xba +++ b/helpauthoring/HelpAuthoring/Validate.xba @@ -43,10 +43,10 @@ Dim bWarnParaNoID As Boolean Sub ValidateXHP - Validate + Validate( "save" ) End Sub -Sub Validate +Sub Validate( optional sOrigin as string ) If not IsHelpFile Then msgbox(strErr_NoHelpFile) @@ -102,7 +102,9 @@ Sub Validate Terminate("Element "+aTagsOpen(ubound(aTagsOpen()))+" not closed",TextElement) End If - msgbox("Validation finished.") + if IsMissing(sOrigin) then + msgbox("Validation finished.") + end if End Sub @@ -207,7 +209,7 @@ Sub CheckParaID(TE As Object) If posID = 0 Then If bWarnParaNoID Then - Warn("Paragraph has no ID.","IDs will be assigned on save. You can also assign an ID using the Assign Paragraph ID menu item",TPE) + 'Warn("Paragraph has no ID.","IDs will be assigned on save. You can also assign an ID using the Assign Paragraph ID menu item",TPE) bWarnParaNoID = FALSE End If _______________________________________________ Libreoffice-commits mailing list libreoffice-comm...@lists.freedesktop.org http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits