aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages/music.scm
diff options
context:
space:
mode:
authorKei Kebreau <kei@openmailbox.org>2016-12-11 17:23:32 -0500
committerKei Kebreau <kei@openmailbox.org>2016-12-12 12:16:17 -0500
commitb43ec33b6d2402d9849ee0b2bfa970e1ead3b3c0 (patch)
treed271cbaebdfb120dac953f01a8133260a78239de /gnu/packages/music.scm
parent987ad88fb6d6b133e5f4bf499610700336d1dd07 (diff)
downloadguix-b43ec33b6d2402d9849ee0b2bfa970e1ead3b3c0.tar
guix-b43ec33b6d2402d9849ee0b2bfa970e1ead3b3c0.tar.gz
gnu: denemo: Change default preferences to use the already-present lilypond.
* gnu/packages/music.scm (denemo)[progpagated-inputs]: Move lilypond to ... [inputs]: ... here. [phases]: New phase set-lilypond.
Diffstat (limited to 'gnu/packages/music.scm')
-rw-r--r--gnu/packages/music.scm15
1 files changed, 13 insertions, 2 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 116e8d4823..4297f846f9 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -251,6 +251,18 @@ many input formats and provides a customisable Vi-style user interface.")
;; testsuite.
(lambda _
(zero? (system* "make" "-C" "tests" "check"))))
+ (add-before 'build 'set-lilypond
+ ;; This phase sets the default path for lilypond to its current
+ ;; location in the store.
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let* ((lilypond (string-append (assoc-ref inputs "lilypond")
+ "/bin/lilypond")))
+ (substitute* "src/core/prefops.c"
+ (("g_string_new \\(\"lilypond\"\\);")
+ (string-append "g_string_new (\""
+ lilypond
+ "\");"))))
+ #t))
(add-after 'install 'correct-filename
;; "graft-derivation/shallow" from the (guix grafts) module runs in
;; the C locale, expecting file names to be ASCII encoded. This
@@ -283,11 +295,10 @@ many input formats and provides a customisable Vi-style user interface.")
("libsndfile" ,libsndfile)
("libtool" ,libtool)
("libxml2" ,libxml2)
+ ("lilypond", lilypond)
("portaudio" ,portaudio)
("portmidi" ,portmidi)
("rubberband" ,rubberband)))
- (propagated-inputs
- `(("lilypond", lilypond)))
(synopsis "Graphical music notation, front-end to GNU Lilypond")
(description
"GNU Denemo is a music notation editor that provides a convenient