From: David Kastrup <dak@gnu.org>
Date: Fri, 23 Aug 2013 20:14:57 +0000 (+0200)
Subject: Issue 4129/2: Use curried-definitions in titling-init and safe-utility-defs
X-Git-Tag: release/2.19.15-1~8
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f076211421e76f94d1db28a584d85e5181573736;p=lilypond.git

Issue 4129/2: Use curried-definitions in titling-init and safe-utility-defs
---

diff --git a/ly/titling-init.ly b/ly/titling-init.ly
index da2bf166c9..eb9ced5375 100644
--- a/ly/titling-init.ly
+++ b/ly/titling-init.ly
@@ -1,5 +1,8 @@
 \version "2.16.0"
 
+#(if (guile-v2)
+  (use-modules (ice-9 curried-definitions)))
+
 slashSeparator = \markup {
   \center-align
   \vcenter \combine
diff --git a/scm/safe-utility-defs.scm b/scm/safe-utility-defs.scm
index 0c699fbbbc..fa6f2e7d30 100644
--- a/scm/safe-utility-defs.scm
+++ b/scm/safe-utility-defs.scm
@@ -26,6 +26,10 @@
   #:export-syntax (define-safe-public)
   #:re-export-syntax (define*-public))
 
+(if (string>? (version) "1.9.10")
+    (use-modules (ice-9 curried-definitions)))
+
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Safe definitions utility