Re: \uppercase function

[David Nalesnik]

Hi Kieren,

On Thu, Apr 9, 2015 at 9:48 AM, Kieren MacMillan <address@hidden> 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/address@hidden/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