Browse files

Fix dg-check to work with stems.

  • Loading branch information...
1 parent 0f17a26 commit 8a49830eb9980b6022aaf7f988b223f83bbd346f @LastOfTheCarelessMen LastOfTheCarelessMen committed Jan 16, 2010
Showing with 2 additions and 2 deletions.
  1. +2 −2 dg-check.pl
View
4 dg-check.pl
@@ -25,8 +25,8 @@
{
for $bar<element>
{
- when .<broken_rhythm> { take .<broken_rhythm><note>[0]; take .<broken_rhythm><note>[1]; }
- when .<note> { take .<note>; }
+ when .<broken_rhythm> { take .<broken_rhythm><stem>[0]<note>; take .<broken_rhythm><stem>[1]<note>; }
+ when .<stem> { take .<stem><note>; }
}
}
}

0 comments on commit 8a49830

Please sign in to comment.