bug#30977: [PATCH] gnu: Add duperemove.

[Ludovic Courtès]

Hello,

Vasile Dumitrascu <address@hidden> skribis:

> * gnu/packages/disk.scm (duperemove): New variable.

Applied with the following changes, mostly to placate ‘guix lint’.

Thanks,
Ludo’.

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index de829cd24..595000bf8 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -463,21 +463,23 @@ a card with a smaller capacity than stated.")
   (package
     (name "duperemove")
     (version "v0.11.beta4")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append "https://github.com/markfasheh/duperemove/archive/";
-                           version ".tar.gz"))
-       (sha256
-        (base32
-         "1h5nk03kflfnzihvn2rvfz1h623x1zpkn9hp29skd7n3f2bc5k7x"))))
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://github.com/markfasheh/duperemove/archive/";
+                    version ".tar.gz"))
+              (sha256
+               (base32
+                "1h5nk03kflfnzihvn2rvfz1h623x1zpkn9hp29skd7n3f2bc5k7x"))
+              (file-name (string-append name "-" version ".tar.gz"))))
     (build-system gnu-build-system)
+    (native-inputs
+     `(("pkg-config" ,pkg-config)))
     (inputs
-     `(("pkg-config" ,pkg-config)
-       ("glib" ,glib)
+     `(("glib" ,glib)
        ("sqlite" ,sqlite)))
     (arguments
-     `(#:tests? #f ;no test suite
+     `(#:tests? #f                                ;no test suite
        #:phases
        (modify-phases %standard-phases
          ;; no configure script
@@ -485,18 +487,18 @@ a card with a smaller capacity than stated.")
        #:make-flags (list (string-append "PREFIX=" %output)
                           "CC=gcc")))
     (home-page "https://github.com/markfasheh/duperemove";)
-    (synopsis "Tools for deduping file systems")
-    (description "Duperemove is a simple tool for finding duplicated extents 
and
-submitting them for deduplication. When given a list of files it will hash 
their
-contents on a block by block basis and compare those hashes to each other,
-finding and categorizing blocks that match each other. When given the -d 
option,
-duperemove will submit those extents for deduplication using the Linux kernel
-extent-same ioctl.
+    (synopsis "Tools for de-duplicating file system data")
+    (description "Duperemove is a simple tool for finding duplicated extents
+and submitting them for deduplication.  When given a list of files it will
+hash their contents on a block by block basis and compare those hashes to each
+other, finding and categorizing blocks that match each other.  When given the
address@hidden option, duperemove will submit those extents for deduplication
+using the Linux kernel extent-same @code{ioctl}.
 
-Duperemove can store the hashes it computes in a 'hashfile'. If given an
-existing hashfile, duperemove will only compute hashes for those files which
-have changed since the last run. Thus you can run duperemove repeatedly on your
-data as it changes, without having to re-checksum unchanged data.
+Duperemove can store the hashes it computes in a @dfn{hash file}.  If given an
+existing hash file, duperemove will only compute hashes for those files which
+have changed since the last run.  Thus you can run duperemove repeatedly on
+your data as it changes, without having to re-checksum unchanged data.
 
-Duperemove can also take input from the fdupes program.")
+Duperemove can also take input from the @command{fdupes} program.")
     (license license:gpl2)))