lilypond-1.3.64

diff --git a/input/bugs/text-kerning.ly b/input/bugs/text-kerning.ly
new file mode 100644 (file)
index 0000000..b40afe2
--- /dev/null
+++ b/input/bugs/text-kerning.ly
@@ -0,0 +1,12 @@
+
+
+\score {
+ \notes \relative c'' < \context Voice {
+%       c16 c16 c16 c16 c4
+        c4 c4 c4
+ }
+\context Lyrics  \lyrics {   foobar4 -- VAVAVAVAV4 -- foobar4 } >
+
+       
+ \paper { linewidth = -10.0\cm; }
+}

diff --git a/scm/generic-property.scm b/scm/generic-property.scm
index ac38879b5545309e4f89eef4980cbfaf6e389dc8..506be8a760c5be68ea8a5f113308a44e19308287 100644 (file)
--- a/scm/generic-property.scm
+++ b/scm/generic-property.scm
@@ -62,6 +62,7 @@
 (define generic-text-properties
   (cons 'Text_item (list
                     (list 'textStyle string? 'style)
+                    (list 'lyricAlignment dir? 'self-alignment-X)
                     (list 'textScriptPadding number? 'padding)
                     (list 'textVerticalAlignment dir? 'self-alignment-Y)
                     (list 'textHorizontalAlignment dir? 'self-alignment-X)