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

[Vasile Dumitrascu <va511e@yahoo.com>]

  Hello

Thank you for the merge,

  Vasile


Ludovic Courtès:
> Hello,
>
> Vasile Dumitrascu <va511e@yahoo.com> 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
> +@option{-d} 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)))