04/04: gnu: colord: Record the file name of the "sqlite3" command.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 2a1f3e3f0f6bd4731f8e7cc98299342e5e9a2443
Author: Ludovic Courtès <address@hidden>
Date:   Sat Nov 2 00:11:11 2019 +0100

    gnu: colord: Record the file name of the "sqlite3" command.
    
    * gnu/packages/gnome.scm (colord)[arguments]: Add
    'set-sqlite3-file-name' phase.
---
 gnu/packages/gnome.scm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 428fe1c..cd881b5 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -3059,7 +3059,16 @@ keyboard shortcuts.")
              (substitute* "rules/meson.build"
                (("udev.get_pkgconfig_variable\\('udevdir'\\)")
                 (string-append "'" (assoc-ref outputs "out") "/lib/udev'")))
-             #t)))))
+             #t))
+         (add-before 'configure 'set-sqlite3-file-name
+           (lambda* (#:key inputs #:allow-other-keys)
+             ;; "colormgr dump" works by invoking the "sqlite3" command.
+             ;; Record its absolute file name.
+             (let ((sqlite (assoc-ref inputs "sqlite")))
+               (substitute* "client/cd-util.c"
+                 (("\"sqlite3\"")
+                  (string-append "\"" sqlite "/bin/sqlite3\"")))
+               #t))))))
     (native-inputs
      `(("glib:bin" ,glib "bin")         ; for glib-compile-resources, etc.
        ("gobject-introspection" ,gobject-introspection)