Imported Upstream version 2.18.0

[lilypond.git] / input / regression / scheme-book-scores.ly

diff --git a/input/regression/scheme-book-scores.ly b/input/regression/scheme-book-scores.ly
index 678844e2a85eeb3ca5ac49dcf4e01c402490717d..fd1609f1b6a279a66430ac7e1599b5ab54b44139 100644 (file)
--- a/input/regression/scheme-book-scores.ly
+++ b/input/regression/scheme-book-scores.ly
@@ -1,4 +1,4 @@
-\version "2.16.0"
+\version "2.17.11"
 
 \header {
 
@@ -19,7 +19,7 @@ informations from top- and booklevel stack correctly."
           (let* ((scmpitch (ly:make-pitch 0 pitch 0))
                  (music (make-music 'EventChord
                           'elements (list (make-music 'NoteEvent
-                                            'duration (ly:make-duration 2 0 1 1)
+                                            'duration (ly:make-duration 2 0 1/1)
                                             'pitch scmpitch))))
                  (score (scorify-music music parser))
                  (layout (ly:output-def-clone $defaultlayout))
@@ -31,9 +31,8 @@ informations from top- and booklevel stack correctly."
             (set! pitch (modulo (1+ pitch) 7)))))
 
 oneNoteScore =
-#(define-music-function (parser location) ()
-   (add-one-note-score parser)
-   (make-music 'Music 'void #t))
+#(define-void-function (parser location) ()
+   (add-one-note-score parser))
 
 %%%