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

[Yousuf Philips]

 helpauthoring/Addons.xcu                      |   32 ++++++++++++++++++++++++++
 helpauthoring/HelpAuthoring/OtherElements.xba |   12 +++++++++
 2 files changed, 44 insertions(+)

New commits:
commit 063d8d387f1ad49bdb478e4c40129140e222d06d
Author: Yousuf Philips <philip...@hotmail.com>
Date:   Thu Sep 10 01:49:45 2015 +0400

    Insert product name and version variables
    
    Change-Id: I9b34d5cb00f33a8a6bc2a376423ad2433a33fbd1
    Reviewed-on: https://gerrit.libreoffice.org/18451
    Reviewed-by: Jan Holesovsky <ke...@collabora.com>
    Tested-by: Jan Holesovsky <ke...@collabora.com>

diff --git a/helpauthoring/Addons.xcu b/helpauthoring/Addons.xcu
index 2dab2c5..13ee45e 100644
--- a/helpauthoring/Addons.xcu
+++ b/helpauthoring/Addons.xcu
@@ -199,6 +199,38 @@
                         </prop>
                     </node>
 
+                    <node oor:name="m18" oor:op="replace">
+                        <prop oor:name="Title" oor:type="xs:string">
+                            <value xml:lang="en-US">Insert Product 
Variables</value>
+                        </prop>
+                        <node oor:name="Submenu">
+                            <node oor:name="m00" oor:op="replace">
+                                <prop oor:name="URL" oor:type="xs:string">
+                                    
<value>vnd.sun.star.script:HelpAuthoring.OtherElements.InsertProductName?language=Basic&amp;location=application</value>
+                                </prop>
+                                <prop oor:name="Title" oor:type="xs:string">
+                                    <value xml:lang="en-US">Insert 
%PRODUCTNAME</value>
+                                </prop>
+                            </node>
+                            <node oor:name="m01" oor:op="replace">
+                                <prop oor:name="URL" oor:type="xs:string">
+                                    
<value>vnd.sun.star.script:HelpAuthoring.OtherElements.InsertProductVersion?language=Basic&amp;location=application</value>
+                                </prop>
+                                <prop oor:name="Title" oor:type="xs:string">
+                                    <value xml:lang="en-US">Insert 
%PRODUCTVERSION</value>
+                                </prop>
+                            </node>
+                            <node oor:name="m02" oor:op="replace">
+                                <prop oor:name="URL" oor:type="xs:string">
+                                    
<value>vnd.sun.star.script:HelpAuthoring.OtherElements.InsertOfficeName?language=Basic&amp;location=application</value>
+                                </prop>
+                                <prop oor:name="Title" oor:type="xs:string">
+                                    <value xml:lang="en-US">Insert 
$[officename]</value>
+                                </prop>
+                            </node>
+                        </node>
+                    </node>
+
                     <!-- Insert invisible tags -->
                     <node oor:name="m20" oor:op="replace">
                         <prop oor:name="URL" oor:type="xs:string">
diff --git a/helpauthoring/HelpAuthoring/OtherElements.xba 
b/helpauthoring/HelpAuthoring/OtherElements.xba
index 8e9d50e..866a3ce 100644
--- a/helpauthoring/HelpAuthoring/OtherElements.xba
+++ b/helpauthoring/HelpAuthoring/OtherElements.xba
@@ -49,6 +49,18 @@ Sub InsertVariable
     InsertTag(&quot;_VAR&quot;,&quot;&lt;/VAR&gt;&quot;)
 End Sub
 
+Sub InsertProductName
+       InsertText( &quot;%PRODUCTNAME&quot; )
+End Sub
+
+Sub InsertProductVersion
+       InsertText( &quot;%PRODUCTVERSION&quot; )
+End Sub
+
+Sub InsertOfficeName
+       InsertText( &quot;$[officename]&quot; )
+End Sub
+
 Sub InsertInlineGraphic
     If not IsHelpFile Then
         msgbox(strErr_NoHelpFile)
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits