Subject: bug#35384: closed (Re: [bug#35384] [PATCH] gnu: Add git-annex-remote-rclone.)

From: [email-masked] (GNU bug Tracking System)
Date: Mon, 06 May 2019 09:01:02 +0000

Your bug report

#35384: [PATCH] gnu: Add git-annex-remote-rclone.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
35384: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=35384
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: [bug#35384] [PATCH] gnu: Add git-annex-remote-rclone.
From: Ludovic Courtès <[email-masked]>
To: "Alex Griffin" <[email-masked]>
Cc: [email-masked]
Date: Mon, 06 May 2019 11:00:26 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

Hi,

"Alex Griffin" <[email-masked]> skribis:

> From d95a0a5271da5620d3a233e01fe0863856c2cb7f Mon Sep 17 00:00:00 2001
> From: Alex Griffin <[email-masked]>
> Date: Mon, 22 Apr 2019 10:35:59 -0500
> Subject: [PATCH] gnu: Add git-annex-remote-rclone.
>
> * gnu/packages/version-control.scm (git-annex-remote-rclone): New variable.

Applied, thanks!

Ludo’.

Subject: [PATCH] gnu: Add git-annex-remote-rclone.
From: "Alex Griffin" <[email-masked]>
To: [email-masked]
Date: Mon, 22 Apr 2019 15:53:25 -0400
List-Id: <debbugs-submit.debbugs.gnu.org>

This wrapper around rclone makes any cloud storage provider supported by rclone usable with git-annex.

-- 
Alex Griffin

From d95a0a5271da5620d3a233e01fe0863856c2cb7f Mon Sep 17 00:00:00 2001
From: Alex Griffin <[email-masked]>
Date: Mon, 22 Apr 2019 10:35:59 -0500
Subject: [PATCH] gnu: Add git-annex-remote-rclone.

* gnu/packages/version-control.scm (git-annex-remote-rclone): New variable.
---
 gnu/packages/version-control.scm | 44 ++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)

diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm
index 3432e70c1b..6988fa4fe2 100644
--- a/gnu/packages/version-control.scm
+++ b/gnu/packages/version-control.scm
@@ -24,6 +24,7 @@
 ;;; Copyright © 2018 Arun Isaac <[email-masked]>
 ;;; Copyright © 2019 Jovany Leandro G.C <[email-masked]>
 ;;; Copyright © 2019 Kei Kebreau <[email-masked]>
+;;; Copyright © 2019 Alex Griffin <[email-masked]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -93,6 +94,7 @@
   #:use-module (gnu packages compression)
   #:use-module (gnu packages sdl)
   #:use-module (gnu packages swig)
+  #:use-module (gnu packages sync)
   #:use-module (gnu packages tcl)
   #:use-module (gnu packages textutils)
   #:use-module (gnu packages time)
@@ -1868,6 +1870,48 @@ Mercurial, Bazaar, Darcs, CVS, Fossil, and Veracity.")
 repository\" with git-annex.")
     (license license:gpl3+)))
 
+(define-public git-annex-remote-rclone
+  (package
+    (name "git-annex-remote-rclone")
+    (version "0.6")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/DanielDent/git-annex-remote-rclone.git")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32
+         "0j0hlxji8d974fq7zd4xc02n0jpi31ylhxc7z4zp8iiwad5mkpxp"))))
+    (build-system trivial-build-system)
+    (arguments
+     `(#:modules ((guix build utils))
+       #:builder
+       (begin
+         (use-modules (guix build utils))
+         (let ((bash (string-append (assoc-ref %build-inputs "bash")
+                                    "/bin/bash"))
+               (rclone (string-append (assoc-ref %build-inputs "rclone")
+                                      "/bin/rclone")))
+           (copy-file (string-append (assoc-ref %build-inputs "source")
+                                     "/git-annex-remote-rclone")
+                      "git-annex-remote-rclone")
+           (substitute* "git-annex-remote-rclone"
+             (("/bin/bash") bash)
+             (("runcmd rclone") (string-append "runcmd " rclone)))
+           (install-file "git-annex-remote-rclone"
+                         (string-append %output "/bin"))
+           #t))))
+    (inputs
+     `(("bash" ,bash)
+       ("rclone" ,rclone)))
+    (home-page "https://github.com/DanielDent/git-annex-remote-rclone")
+    (synopsis "Use rclone-supported cloud storage providers with git-annex")
+    (description "This wrapper around rclone makes any destination supported
+by rclone usable with git-annex.")
+    (license license:gpl3+)))
+
 (define-public fossil
   (package
     (name "fossil")
-- 
2.20.1