[bug#38726] [PATCH] gnu: Add dvdbackup

[Riku Viitanen via Guix-patches via <guix-patches@gnu.org>]

From f7a8d9b8289d139a7dd85d0526362062f300be0b Mon Sep 17 00:00:00 2001
From: Riku Viitanen <riku.viitanen@protonmail.com>
Date: Tue, 24 Dec 2019 00:49:07 +0200
Subject: [PATCH] gnu: Add dvdbackup.

* gnu/packages/video.scm (dvdbackup): New variable.
---
 gnu/packages/video.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index 1696560787..9fe3d0726f 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -34,6 +34,7 @@
 ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
 ;;; Copyright © 2019 Timo Eisenmann <eisenmann@fn.de>
 ;;; Copyright © 2019 Arne Babenhauserheide <arne_bab@web.de>
+;;; Copyright © 2019 Riku Viitanen <riku.viitanen@protonmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -3759,3 +3760,27 @@ to convenience of translating and batch processing of multiple documents.")
       (description "Theorafile is a library for quickly and easily decoding Ogg
 Theora videos.  Theorafile was written to be used for FNA's VideoPlayer.")
       (license license:zlib))))
+
+(define-public dvdbackup
+  (package
+    (name "dvdbackup")
+    (version "0.4.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "mirror://sourceforge/" name "/" name "/"
+                           name "-" version "/"
+                           name "-" version ".tar.xz"))
+       (sha256
+        (base32 "1rl3h7waqja8blmbpmwy01q9fgr5r0c32b8dy3pbf59bp3xmd37g"))))
+    (build-system gnu-build-system)
+    (inputs
+     `(("libdvdread" ,libdvdread)
+       ("libdvdcss" ,libdvdcss)))
+    (home-page "http://dvdbackup.sourceforge.net")
+    (synopsis "DVD video ripper")
+    (description
+     "A simple command line tool to backup video from a DVD. Decrypts the
+DVD using @command{libdvdcss}, but does @strong{not} demux, remux,
+transcode or reformat the videos in any way, producing perfect backups.")
+    (license license:gpl3+)))
--
2.24.0