;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 1998--2008 Jan Nieuwenhuizen <janneke@gnu.org>
+;;;; (c) 1998--2009 Jan Nieuwenhuizen <janneke@gnu.org>
;;;; Han-Wen Nienhuys <hanwen@xs4all.nl>
;;;; Note: currently misused as testbed for titles with markup, see
(define (glyph-spec w x y g)
(let ((prefix (if (string? g) "/" "")))
- (ly:format "~4f ~4f ~a~a"
- (+ w x) y
+ (ly:format "~4f ~4f ~4f ~a~a"
+ w x y
prefix g)))
(ly:format