From eedea8ce4780eb541d71ba8695a865e805c85631 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Fri, 12 Jul 2019 22:53:54 -0400 Subject: git-annex.scm: Add ipfs special remote --- km-packages/git-annex.scm | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) diff --git a/km-packages/git-annex.scm b/km-packages/git-annex.scm index d17f881..7a6405d 100644 --- a/km-packages/git-annex.scm +++ b/km-packages/git-annex.scm @@ -22,7 +22,9 @@ #:use-module (gnu packages) #:use-module (gnu packages haskell) #:use-module (gnu packages haskell-apps) + #:use-module (gnu packages ipfs) #:use-module (guix build utils) + #:use-module (guix build-system trivial) #:use-module (guix build-system haskell) #:use-module (guix download) #:use-module (guix gexp) @@ -124,3 +126,35 @@ full-featured binding.") (inputs `(("ghc-concurrent-output" ,ghc-concurrent-output) ("ghc-magic" ,ghc-magic) ,@(package-inputs git-annex))))) + +(define-public git-annex-remote-ipfs + (package + (name "git-annex-remote-ipfs") + (version "0.20190702") + (source + (origin + (method url-fetch) + (uri (string-append "https://git-annex.branchable.com/" + "special_remotes/external/git-annex-remote-ipfs")) + (sha256 + (base32 + "0m3fwaz4r7y0xf07rnh23n7rk2qm8idizslspwcqmp413m97w345")))) + (build-system trivial-build-system) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + (let* ((file (assoc-ref %build-inputs "source")) + (out (string-append %output "/bin")) + (outfile (string-append out "/git-annex-remote-ipfs"))) + (mkdir-p out) + (copy-file file outfile) + (chmod outfile #o555) + #t)))) + (propagated-inputs + `(("go-ipfs" ,go-ipfs))) + (home-page "https://git-annex.branchable.com") + (synopsis "todo") + (description "todo") + (license license:gpl3))) -- cgit v1.2.3