04/05: gnu: ledger: Fix build with Boost >= 1.68.

[guix-commits]

mbakke pushed a commit to branch core-updates
in repository guix.

commit 68f2e552060a9c94f1eb56246e7f14103ca119dc
Author: Marius Bakke <address@hidden>
Date:   Sat Nov 24 15:55:29 2018 +0100

    gnu: ledger: Fix build with Boost >= 1.68.
    
    * gnu/packages/finance.scm (ledger)[arguments]: Add phase 'boost-compat.
---
 gnu/packages/finance.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/gnu/packages/finance.scm b/gnu/packages/finance.scm
index 28bfb28..929f8a5 100644
--- a/gnu/packages/finance.scm
+++ b/gnu/packages/finance.scm
@@ -165,6 +165,13 @@ line client and a client based on Qt.")
        #:make-flags (list "ARGS=-E BaselineTest_cmd-org")
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'boost-compat
+           (lambda _
+             (substitute* "src/utils.h"
+               ;; This library moved in Boost 1.66.  Remove for Ledger
+               ;; versions > 3.1.1.
+               (("boost/uuid/sha1.hpp") "boost/uuid/detail/sha1.hpp"))
+             #t))
          (add-before 'configure 'install-examples
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((examples (string-append (assoc-ref outputs "out")