capsite

commit cc136fcf979790eebd45a7a22423c1e7aa391bc6
parent a17571b0360274aa71e9ec59a1cb994e7d4cc1a4
Auteur: Selve <selve@asteride.xyz>
Date:   Wed, 12 Apr 2023 18:45:05 -0400

ajout de macros pour définir des variables

Diffstat:
M
lib/general.m4
 | 
38
+++++++++++++++-----------------------

1 file changed, 15 insertions(+), 23 deletions(-)
diff --git a/lib/general.m4 b/lib/general.m4
@@ -14,42 +14,34 @@ define([C_D],
 
 # Métadonnées
 
+# Définir une, deux ou trois variables
+define([DEF_VAR], [define([E_$1], [define([L_$1], ]C_G()C_G$[]1C_D()C_D[)])])
+define([DEF_VAR_2], [define([E_$1], [define([L_$1_$2], ]C_G()C_G$[]1C_D()C_D[)][define([L_$1_$3], ]C_G()C_G$[]2C_D()C_D[)])])
+define([DEF_VAR_3], [define([E_$1], [define([L_$1_$2], ]C_G()C_G$[]1C_D()C_D[)][define([L_$1_$3], ]C_G()C_G$[]2C_D()C_D[)][define([L_$1_$4], ]C_G()C_G$[]3C_D()C_D[)])])
+
 # Langue de la page
-define([E_LANG_PAGE],
-[define([L_LANG_PAGE], [[$1]])])
+DEF_VAR([LANG_PAGE])
 
 # Nom du l'auteur
-define([E_AUTEUR],
-[define([L_AUTEUR], [[$1]])])
+DEF_VAR([AUTEUR])
 
 # Date de première publication
-define([E_DATE_PUB],
-[define([L_DATE_PUB_ANNEE], [[$1]])]dnl
-[define([L_DATE_PUB_MOIS], [[$2]])]dnl
-[define([L_DATE_PUB_JOUR], [[$3]])])
+DEF_VAR_3([DATE_PUB], [ANNEE], [MOIS], [JOUR])
 
 # Date de dernière publication
-define([E_DATE_MOD],
-[define([L_DATE_MOD_ANNEE], [[$1]])]dnl
-[define([L_DATE_MOD_MOIS], [[$2]])]dnl
-[define([L_DATE_MOD_JOUR], [[$3]])])
+DEF_VAR_3([DATE_MOD], [ANNEE], [MOIS], [JOUR])
 
 # Titre de la page
-define([E_TITRE],
-[define([L_TITRE], [[$1]])])
+DEF_VAR([TITRE])
 
-define([E_TITRE_SOUS],
-[define([L_TITRE_SOUS], [[$1]])])
+DEF_VAR([TITRE_SOUS])
 
 # Type de page
-define([E_TYPE],
-[define([L_TYPE], [[$1]])])
+DEF_VAR([TYPE])
 
-define([E_CH_RET_LIEN],
-[define([L_CH_RET_LIEN], [[$1]])])
+DEF_VAR([CH_RET_LIEN])
 
-define([E_CH_RET_NOM],
-[define([L_CH_RET_NOM], [[$1]])])
+DEF_VAR([CH_RET_NOM])
 
 # Formats
 
@@ -80,7 +72,7 @@ I_DATE(incr(decr(L_DATE_MOD_JOUR)) F_NOM_MOIS(L_DATE_MOD_MOIS) L_DATE_MOD_ANNEE)
 
 # Gestion de l'espacement
 
-define([E_ESP], [define([L_ESP], [[$1]])])
+DEF_VAR([ESP])
 E_ESP(0)
 
 define([M_ESP_AFF],