Hi Kieren,

On Thu, Apr 9, 2015 at 9:48 AM, Kieren MacMillan <
[email protected]> wrote:

> Hi all,
>
> I’m looking for an \uppercase function to use in Lilypond — this one
> (which I found somewhere, but can’t remember where now) doesn’t seem to
> work:
>
> \version "2.19"
>
> #(define-markup-command (uppercase paper props markup-argument) (markup?)
> (interpret-markup paper (prepend-alist-chain 'case 'up props)
> markup-argument))
>
> \markup \uppercase “Test"
>
> Any hints or solutions would be appreciated.
>

You are only using part of the code which I find here:
http://www.autoindustry536.bllog.opensubscriber.com/message/[email protected]/12807136.html


Note that the following will work with your simple example, though
\uppercase has to be directly before the markup:
#(define-markup-command (uppercase layout props markup-argument)
   (markup?)
   (interpret-markup layout props
     (string-upcase (markup->string markup-argument))))


HTH,
David
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to