X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fmarkup-user.ly;h=8c4afdf6acc504826de2e4a1b121bf98998b491b;hb=901c1171045a0507b12c0b17eb1a22e1f5ca5f8e;hp=8c94ec6d42a93f9c8939cd5d59e6917bfd56a7e8;hpb=730c54a571ab3b6c30e02be5f93c876abee0f9a7;p=lilypond.git diff --git a/input/regression/markup-user.ly b/input/regression/markup-user.ly index 8c94ec6d42..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.10.0" +\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 + } + } +}