|
From: | Gilles Thibault |
Subject: | Re: "Retour à la ligne" en Scheme |
Date: | Tue, 27 Feb 2018 17:28:41 +0100 |
User-agent: | Webmail Free/1.3.3 |
Voici ce qui fonctionne chez moi:#(define-markup-command (two-lines layout props nameI nameII) (markup? markup? )(interpret-markup layout props ( markup (markup #:line ;; pourquoi 2 markup ? (#:right-column (#:override '(font-name . "Gentium Book Basic") (#:abs-fontsize 28 #:italic #:medium nameI ) #:abs-fontsize 28 "\n" ;; du coup ça ne sert plus à rien. #:override '(font-name . "Gentium Book Basic") (#:abs-fontsize 28 #:italic #:medium nameII ) ) ) ) ) ) )
Hum, on peut sûrement optimiser un peu, si nameI et nameII ont les même réglages :
#(define-markup-command (two-lines layout props nameI nameII) (markup? markup? )
(interpret-markup layout props (markup #:override '(font-name . "Gentium Book Basic") #:abs-fontsize 28 #:italic #:medium #:right-column (nameI nameII)))) \markup \two-lines #"ligne 1" #"ligne 2" Note :Le (markup #:line ...) est inutile sous 2.19, mais peut-être que ça ne l'était pas sous 2.16. Je ne me rappelle plus.
-- Gilles
[Prev in Thread] | Current Thread | [Next in Thread] |