gnu: git-annex: Create fake static output.
authorTimothy Sample <samplet@ngyro.com>
Mon, 17 Aug 2020 15:03:58 +0000 (11:03 -0400)
committerTimothy Sample <samplet@ngyro.com>
Mon, 17 Aug 2020 15:03:58 +0000 (11:03 -0400)
This is a work-around for a problem introduced by commit
718dc7d4a5e5d26cac80c79d78535677e0379dc8.

* gnu/packages/haskell-apps.scm (git-annex)[arguments]: Add a phase
to generate the "static" output.

gnu/packages/haskell-apps.scm

index c70f173..dac626f 100644 (file)
@@ -427,7 +427,17 @@ to @code{cabal repl}).")
                         (string-append bin "/git-annex-shell"))
                (symlink (string-append bin "/git-annex")
                         (string-append bin "/git-remote-tor-annex"))
-               #t))))))
+               #t)))
+         (add-after 'install 'touch-static-output
+           (lambda* (#:key outputs #:allow-other-keys)
+             ;; The Haskell build system adds a "static" output by
+             ;; default, and there is no way to override this until
+             ;; <https://issues.guix.gnu.org/41569> is fixed.  Without
+             ;; this phase, the daemon complains because we do not
+             ;; create the "static" output.
+             (with-output-to-file (assoc-ref outputs "static")
+               (lambda ()
+                 (display "static output not used\n"))))))))
     (inputs
      `(("curl" ,curl)
        ("ghc-aeson" ,ghc-aeson)