From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Thu, 11 Jan 2007 14:40:18 +0000 (+0100)
Subject: fix midi lengths for drum notes too.
X-Git-Tag: release/2.11.11-1~1
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=73b3cc9a021e7c2751eb00a9571f8c5d7b63a273;p=lilypond.git

fix midi lengths for drum notes too.
---

diff --git a/lily/drum-note-performer.cc b/lily/drum-note-performer.cc
index 1e64ef6c3a..c81fca0482 100644
--- a/lily/drum-note-performer.cc
+++ b/lily/drum-note-performer.cc
@@ -64,7 +64,15 @@ Drum_note_performer::process_music ()
                 tie_event = ev;
             }
 
-	  Audio_note *p = new Audio_note (*pit, get_event_length (n), 
+	  Moment len = get_event_length (n);
+	  if (now_mom().grace_part_)
+	    {
+	      len.grace_part_ = len.main_part_;
+	      len.main_part_ = Rational (0);
+	    }
+	      
+
+	  Audio_note *p = new Audio_note (*pit, len,
                                           tie_event, Pitch (0, 0, 0));
 	  Audio_element_info info (p, n);
 	  announce_element (info);