From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 22 Oct 2002 23:16:17 +0000 (+0000)
Subject: (big_rest): multi measure rest was
X-Git-Tag: release/1.7.5~8
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=71f41e0ac4325fc429b02d108e6e9b0050939f04;p=lilypond.git

(big_rest): multi measure rest was
off horizontally by 0.05 ss. Fixed.
---

diff --git a/lily/multi-measure-rest.cc b/lily/multi-measure-rest.cc
index e0a44196a0..e50e73b20f 100644
--- a/lily/multi-measure-rest.cc
+++ b/lily/multi-measure-rest.cc
@@ -298,8 +298,6 @@ MAKE_SCHEME_CALLBACK (Multi_measure_rest, set_spacing_rods,1);
 SCM
 Multi_measure_rest::set_spacing_rods (SCM smob)
 {
-  return SCM_UNSPECIFIED;
-
   Grob*me = unsmob_grob (smob);
 
   Spanner*sp = dynamic_cast<Spanner*> (me);
@@ -343,6 +341,6 @@ Multi_measure_rest::set_spacing_rods (SCM smob)
 
 
 ADD_INTERFACE (Multi_measure_rest,"multi-measure-rest-interface",
-	       "A rest that spans a whole number of measures.\n",
+	       "A rest that spans a whole number of measures.",
 	       "expand-limit measure-count hair-thickness thick-thickness use-breve-rest");
 
diff --git a/scm/drums.scm b/scm/drums.scm
index 6c8838c5dc..8c1a7efc8b 100644
--- a/scm/drums.scm
+++ b/scm/drums.scm
@@ -172,7 +172,7 @@
 ;; adds the articulation script x to m if x is not #f.
 (define (add-articulation-script m x)
   (if x
-   (if (and x (equal? (ly:music-name m) "Request_chord"))
+   (if (and x (equal? (ly:music-name m) "Event_chord"))
      (ly:set-mus-property! m 'elements
        (cons (make-articulation-script x) (ly:get-mus-property m 'elements))
      )
@@ -267,7 +267,7 @@
 ;; converts a midi-pitched (ly/drumpitch.ly) file to paper output.
 (define-public ((drums->paper kit) music)
   (begin
-   (if (equal? (ly:music-name music) "Request_chord")
+   (if (equal? (ly:music-name music) "Event_chord")
     (set! music (make-drum-head kit music))
     (let* ((es (ly:get-mus-property music 'elements))
            (e (ly:get-mus-property music 'element))