X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fmarkup-user.ly;h=8c4afdf6acc504826de2e4a1b121bf98998b491b;hb=ae0495dda1032c3994c770d727c65b46e702459c;hp=970f31ce8c17b122d0d3279206a59bc3bb2a3800;hpb=2205ef7a616d73e6a83274816e775426bf41b7bd;p=lilypond.git diff --git a/input/regression/markup-user.ly b/input/regression/markup-user.ly index 970f31ce8c..8c4afdf6ac 100644 --- a/input/regression/markup-user.ly +++ b/input/regression/markup-user.ly @@ -1,10 +1,7 @@ \header { - - texidoc = "Own markup commands may be defined by using the - @code{define-markup-command} scheme macro." - - + texidoc = "Users may define non-standard markup commands using +the @code{define-markup-command} scheme macro." } @@ -12,16 +9,23 @@ -\version "2.7.39" +\version "2.14.0" #(define-markup-command (upcase paper props str) (string?) "Upcase the string characters. Syntax: \\upcase #\"string\"" (interpret-markup paper props (make-simple-markup (string-upcase str)))) - -{ - c''-\markup \upcase #"hello world" +\score{ + { + c''-\markup \upcase #"hello world" % produces a "HELLO WORLD" markup -} + } + \layout { + \context { + \Score + \override PaperColumn #'keep-inside-line = ##f + } + } +}