input/regression/markup-special-characters.ly

   1 \version "2.15.0"
   2 \header {
   3   texidoc = "
   4   A list of special characters ASCII aliases can be easily included.
   5   This works for markups and lyrics.
   6   "
   7 }
   8
   9 \paper {
  10   #(include-special-characters)
  11 }
  12
  13 #(define-markup-list-command (show-special-characters layout props) ()
  14    (let ((defs (ly:output-def-lookup layout 'text-font-defaults)))
  15      (interpret-markup-list layout props
  16        (map (lambda (pair)
  17          (markup #:override '(line-width . 18) #:fill-line (
  18              #:override '(replacement-alist . ()) (car pair)
  19              #:override '(thickness . 0.1) #:box (cdr pair))))
  20          (list-tail (assoc-get 'replacement-alist defs) 3)))))
  21
  22 \markup "List of the special characters:"
  23 \markuplines \justified-lines \show-special-characters
  24
  25 \markup { \vspace #2 "Markup example:" }
  26 \markup { \vspace #1 "§numero;2 §ndash; §OE;dipe§hellip; Qui de ton complexe e§s;t épargné§nnbsp;? (B. Bordage §copyright; 2011)" }
  27 \markup { \vspace #1 "Lyric example:" }
  28 \new Lyrics \lyricmode {
  29   Ce§s;16 -- §s;ez In -- fi -- dè -- les, un c§oe;ur in -- no -- cent ne §s;çau -- roit vous plai -- re~en -- cor§nnbsp;;
  30 }