filet devant signature, ajout neutral à menu titre (323df7c0) · Commits · FNSO / I-FAIR IR / modeles-stylage

MS_Word/Metopes/Commons-publishing-Metopes.dotm

+6.37 KiB (302 KiB)

File changed.

No diff preview for this file type.

+2 −0

Changes for MS_Word/Metopes/customUI/customUI14.xml: 2 added lines, 0 removed lines.
Original line number	Diff line number	Diff line
		@@ -83,6 +83,7 @@
		<button getLabel="GetLabel" id="surtitre" onAction="title_sup" getVisible="GetVisibleExtended"></button>
		<button getLabel="GetLabel" id="titretrad" onAction="title_trl"></button>
		<button getLabel="GetLabel" id="sstitre" onAction="title_sub"></button>
		<button getLabel="GetLabel" id="neutral2" onAction="neutral" getVisible="GetVisibleExtended"></button>
		</menu>
		<button getLabel="GetLabel" id="titre1" onAction="T1"></button>
		<button getLabel="GetLabel" id="titre2" onAction="T2"></button>
		@@ -212,6 +213,7 @@
		<button getLabel="GetLabel" id="repliqTxt" onAction="replica"></button>
		<button getLabel="GetLabel" id="ligversTxt" onAction="versifiedreplica"></button>
		</menu>
		<menuSeparator id="separator32"></menuSeparator>
		<button getLabel="GetLabel" id="signature" onAction="signature" getVisible="GetVisibleExtended"></button>
		<menuSeparator id="separator14"></menuSeparator>

+6 −0

Changes for MS_Word/Metopes/vba/modules/i18n.bas: 6 added lines, 0 removed lines.
Original line number	Diff line number	Diff line
		@@ -33,6 +33,8 @@ Sub getLabel(control As IRibbonControl, ByRef ReturnedVal)
		ReturnedVal = "Titre traduit"
		Case "sstitre"
		ReturnedVal = "Sous-titre"
		Case "neutral2"
		ReturnedVal = " " & ChrW(&HAA) & " neutral"
		Case "titre1"
		ReturnedVal = "Titre 1"
		Case "titre2"
		@@ -547,6 +549,8 @@ Sub getLabel(control As IRibbonControl, ByRef ReturnedVal)
		ReturnedVal = "T" & ChrW(&HED) & "tulo traducido"
		Case "sstitre"
		ReturnedVal = "Subt" & ChrW(&HED) & "tulo"
		Case "neutral2"
		ReturnedVal = " " & ChrW(&HAA) & " neutral"
		Case "titre1"
		ReturnedVal = "T" & ChrW(&HED) & "tulo 1"
		Case "titre2"
		@@ -1040,6 +1044,8 @@ Sub getLabel(control As IRibbonControl, ByRef ReturnedVal)
		ReturnedVal = "Translated Title"
		Case "sstitre"
		ReturnedVal = "Subtitle"
		Case "neutral2"
		ReturnedVal = " " & ChrW(&HAA) & " neutral"
		Case "titre1"
		ReturnedVal = "Heading 1"
		Case "titre2"