Issue 4129/1: Load (ice-9 curried-definitions) in ly/init.scm and documentation-lib.scm

The load is made conditionally for GUILEv2 where curried definitions
need this library.

diff --git a/ly/init.ly b/ly/init.ly
index acaa2c9899939af19c94e387ff6a9446e773469d..876fc49464e125c97ad79ceb9d60f04dd6deaee9 100644 (file)
--- a/ly/init.ly
+++ b/ly/init.ly
@@ -6,6 +6,9 @@
 
 \version "2.16.0"
 
+#(if (guile-v2)
+  (use-modules (ice-9 curried-definitions)))
+
 #(session-initialize
   (lambda ()
    ;; we can't use ly:parser-include-string here since that does not

diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index da7d29665855095e98d75ac2704848c7d9377de2..9747f60632a7ec749b1582e3e2da94298e4b6239 100644 (file)
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -20,6 +20,9 @@
              (srfi srfi-13)
              (srfi srfi-1))
 
+(if (guile-v2)
+    (use-modules (ice-9 curried-definitions)))
+
 (define-class <texi-node> ()
   (appendix #:init-value #f #:accessor appendix? #:init-keyword #:appendix)
   (children #:init-value '() #:accessor node-children #:init-keyword #:children)