commit e96f3806c22c9daab3d082a630c4fc63a5195e95
parent 609f58789a9e67ccea1160ab1c268016dd23cdd1
Auteur: Selve <selve@asteride.xyz>
Date: Sun, 1 Oct 2023 19:12:08 -0400
[cont] ajout de guillemets autour de citations
Ne concerne que les fichiers gemtext.
Diffstat:
2 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/lib/vers/gemtext.awk b/lib/vers/gemtext.awk
@@ -46,6 +46,9 @@ etq(":par:$") && ouvrante() {
ramasser("[" note_num "] ")
aff_note_num = 0
}
+ m = trouver_meta(":par:@:citation:$")
+ if (m != "")
+ ramasser("« ")
}
etq(":lien:$") && ouvrante() {
@@ -100,6 +103,9 @@ etq("^:doc:section:$") && fermante() {
etq(":par:$") && fermante() {
type = trouver_meta(":par:@:type:$")
+ m = trouver_meta(":par:@:citation:$")
+ if (m != "")
+ ramasser(" »")
if (meta[type] != "liens")
ramasser("\n")
metadonnees_supp($1)
diff --git a/lib/vers/html.awk b/lib/vers/html.awk
@@ -68,7 +68,7 @@ etq(":par:$") && ouvrante() {
nom = "pre"
else
nom = "p"
- m = trouver_meta(":@:citation:$")
+ m = trouver_meta(":par:@:citation:$")
if (m != "")
nom = "blockquote"
if (aff_note_num) {
@@ -145,7 +145,7 @@ etq(":par:$") && fermante() {
ramasser("</pre>\n")
else
ramasser("</p>\n")
- m = trouver_meta(":@:citation:$")
+ m = trouver_meta(":par:@:citation:$")
if (m != "")
ramasser("</blockquote>\n")
metadonnees_supp($1)