Get the current duration for multi-note stems.

colomon · May 15, 2012 · d069718 · d069718
1 parent 83d7ac7
commit d069718
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/bin/abc2ly.pl b/bin/abc2ly.pl
@@ -167,8 +167,8 @@ (ABC::Header $header, $out)
 
             when ABC::Stem {
                 " <" ~ $stem.notes.map({ $.context.get-Lilypond-pitch($_.pitch) }).join(' ') ~ ">"
-                     ~ $.context.get-Lilypond-duration($stem.notes[0])
+                     ~ $.context.get-Lilypond-duration($stem)
-                     ~ ($stem.notes[0].is-tie ?? '~' !! '')
+                     ~ ($stem.is-tie ?? '~' !! '')
                      ~ $suffix
                      ~ " ";
             }