diff options
author | Yousuf Philips <philipz85@hotmail.com> | 2015-09-13 16:36:49 +0400 |
---|---|---|
committer | Jan Holesovsky <kendy@collabora.com> | 2015-09-14 07:18:19 +0000 |
commit | 2ddad0eafa26b96fb455eea5245a145e7346ca55 (patch) | |
tree | e64e374cc13c454cefe296ee616df3aabce1d605 /helpauthoring | |
parent | 84f91a57539f7841cf50c924440f6890341c29c6 (diff) |
Dont display unnecessary dialogs
Change-Id: Ica0bc38bd23f298ce3e44e2d1bb8db0acf2c7a62
Reviewed-on: https://gerrit.libreoffice.org/18531
Reviewed-by: Jan Holesovsky <kendy@collabora.com>
Tested-by: Jan Holesovsky <kendy@collabora.com>
Diffstat (limited to 'helpauthoring')
-rw-r--r-- | helpauthoring/HelpAuthoring/OtherElements.xba | 2 | ||||
-rw-r--r-- | helpauthoring/HelpAuthoring/Validate.xba | 10 |
2 files changed, 7 insertions, 5 deletions
diff --git a/helpauthoring/HelpAuthoring/OtherElements.xba b/helpauthoring/HelpAuthoring/OtherElements.xba index e718ac2f..c93bc816 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 70e07a7c..4e24ecd4 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 |