From 0d393911ddb1ef2887ac24eb3cd087636d115a00 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Tue, 3 Sep 2019 18:35:04 -0400
Subject: git-annex-dev: Inherit from km-git-annex

... to avoid duplicating modifications.
---
 km-packages/git-annex.scm | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/km-packages/git-annex.scm b/km-packages/git-annex.scm
index d8efb18..aa410ac 100644
--- a/km-packages/git-annex.scm
+++ b/km-packages/git-annex.scm
@@ -103,15 +103,14 @@ full-featured binding.")
 (define-public git-annex-dev
   (let ((commit (current-commit)))
     (package
-      (inherit git-annex)
+      (inherit km-git-annex)
       (name "git-annex-dev")
       (version (string-append "000-" (string-take commit 7)))
       (source (local-file %source-dir
                           #:recursive? #t
                           #:select? (git-predicate %source-dir)))
       (arguments
-       `(#:tests? #f
-         ,@(substitute-keyword-arguments (package-arguments git-annex)
+       `(,@(substitute-keyword-arguments (package-arguments git-annex)
              ((#:phases phases)
               `(modify-phases ,phases
                  (add-before 'factor-setup 'delete-setup
@@ -119,14 +118,11 @@ full-featured binding.")
                      ;; Otherwise get write error because is read-only.
                      (delete-file "Setup.hs")
                      #t))
-                 (delete 'check)
                  (add-before 'unpatch-shell-and-rebuild 'delete-shell
                    (lambda _
                      ;; Avoid permission error when copying file.
                      (delete-file "Utility/Shell.hs")
-                     #t)))))))
-      (inputs `(("ghc-magic" ,ghc-magic)
-                ,@(package-inputs git-annex))))))
+                     #t))))))))))
 
 (define-public git-annex-remote-ipfs
   (package
-- 
cgit v1.2.3