* lily/stem.cc (get_default_stem_end_position): use beam_count - 1

[lilypond.git] / input / test / add-staccato.ly

diff --git a/input/test/add-staccato.ly b/input/test/add-staccato.ly
index bbf30f6feff69048fda8a3c007ec746b044f9aa7..3f772c75f2a57d3bc7f2dc6363d3619a2c9aadf6 100644 (file)
--- a/input/test/add-staccato.ly
+++ b/input/test/add-staccato.ly
@@ -1,3 +1,4 @@
+\version "1.5.68"
 \header {
 
 texidoc= "Using make-music, you can add various stuff to notes. Here
@@ -8,13 +9,13 @@ one would not use scm constructs.  See separate-staccato.ly first."
 
 #(define (make-script x)
    (let ((m (ly-make-music "Articulation_req")))
-     (ly-set-mus-property! m 'articulation-type x)
-     (ly-set-mus-property! m 'script x)
+     (ly-set-mus-property!! m 'articulation-type x)
+     (ly-set-mus-property!! m 'script x)
      m))
     
 #(define (add-script m x)
    (if (equal? (ly-music-name m) "Request_chord")
-       (ly-set-mus-property! m 'elements
+       (ly-set-mus-property!! m 'elements
                            (cons (make-script x)
                                  (ly-get-mus-property m 'elements)))