tempo marking fuction

[Anh Hai Trinh]

Hello,

I want to have a function that can put text tempo marking, e.g. "Allegro".
The manual suggests

> tempoMark = #(define-music-function (parser location padding marktext)
>                                    (number? string?)
> #{
>   \once \override Score . RehearsalMark #'padding = $padding
>   \once \override Score . RehearsalMark #'no-spacing-rods = ##t
>   \mark \markup { \bold $marktext }
> #})

<http://lilypond.org/doc/v2.10/Documentation/user/lilypond/Simple-substitution-functions#Simple-substitution-functions>

But that put the text centered on the bar line and that's not right. Is
there a way to do it properly, i.e. left aligned with the bar?

Thanks,
AT