[Libreoffice-commits] dev-tools.git: helpauthoring/HelpAuthoring

[Yousuf Philips]

 helpauthoring/HelpAuthoring/OtherElements.xba |    2 +-
 helpauthoring/HelpAuthoring/Validate.xba      |   10 ++++++----
 2 files changed, 7 insertions(+), 5 deletions(-)

New commits:
commit 2ddad0eafa26b96fb455eea5245a145e7346ca55
Author: Yousuf Philips <philipz85 at 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 <kendy at collabora.com>
    Tested-by: Jan Holesovsky <kendy at 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