]> git.donarmstrong.com Git - lilypond.git/commitdiff
Issue 5104 Let scheme-sandbox use system-repl with guile-2.x
authorThomas Morley <thomasmorley65@gmail.com>
Tue, 21 Mar 2017 20:13:30 +0000 (21:13 +0100)
committerThomas Morley <thomasmorley65@gmail.com>
Tue, 28 Mar 2017 09:02:10 +0000 (11:02 +0200)
This fixes the warning returned by guile-2.x

`scm-style-repl' in the default environment is deprecated.
Find it in the `(ice-9 scm-style-repl)' module instead, or
better yet, use the repl from `(system repl repl)'.

ly/scheme-sandbox.ly

index 7dec0dcd1c157aed892b4e152bd54bcc5d2643ac..1f233c0cfa46ce064fcedca2a47bde87408849f3 100644 (file)
@@ -13,4 +13,8 @@
 % requirements may be different.
 
 #(newline)
-#(scm-style-repl)
+#(if (guile-v2)
+     (begin
+       (use-modules (system repl repl))
+       (start-repl))
+     (scm-style-repl))