X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fgeneral-scheme-bindings.ly;h=bf00be2fc41b2396041b5d4c01f267caf457b910;hb=341603e3e0b1e103ccb7e607eba5e1043318c6d4;hp=acbf4e0bd08d90f2960f9c15106035e2bd856a75;hpb=c680e5a341911acea810d7c0a2dcfcfaa007ee11;p=lilypond.git

diff --git a/input/regression/general-scheme-bindings.ly b/input/regression/general-scheme-bindings.ly
index acbf4e0bd0..bf00be2fc4 100644
--- a/input/regression/general-scheme-bindings.ly
+++ b/input/regression/general-scheme-bindings.ly
@@ -1,11 +1,11 @@
 \header {
 
-  texidoc = "This file tests various Scheme utiliity functions." 
+  texidoc = "This file tests various Scheme utility functions." 
 
 }
 
 
-\version "2.11.8"
+\version "2.17.11"
 
 %% todo : use macro, to show the statement tested. 
 #(ly:progress "~a\n" (ly:expand-environment "${HOME} $HOME $$ "))
@@ -14,7 +14,7 @@
 %% very platform dependent.
 %% #(ly:font-config-display-fonts)
 
-#(ly:progress "~A\n" (ly:duration->string (ly:make-duration 2 2 3 7)))
+#(ly:progress "~A\n" (ly:duration->string (ly:make-duration 2 2 3/7)))
 #(ly:parser-parse-string (ly:parser-clone parser) "foo  = #1 #(ly:progress \"hello there\n\")")
 
 #(ly:progress "~a\n" (ly:truncate-list! (iota 5) 10))