GNU bug report logs - #26935
[PATCH 3/3] gnu: video: add mediainfo

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 26935 in the body.
You can then email your comments to 26935 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: "Ethan R. Jones" <doubleplusgood23 <at> gmail.com>
To: guix-patches <at> gnu.org
Cc: "Ethan R. Jones" <doubleplusgood23 <at> gmail.com>
Subject: [PATCH 3/3] gnu: video: add mediainfo
Date: Sun, 14 May 2017 22:57:01 -0400

---
 gnu/packages/video.scm | 56 +++++++++++++++++++++++++++++++++++++++++++++-----
 1 file changed, 51 insertions(+), 5 deletions(-)

diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index d04bfab96..b91874dad 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -1506,11 +1506,11 @@ format changes.")
      '(#:phases
        (modify-phases %standard-phases
          (add-before
-          'configure 'pre-configure
-          (lambda _
-            (chdir "build/generic")
-            (substitute* "configure"
-              (("#! /bin/sh") (string-append "#!" (which "sh")))))))
+             'configure 'pre-configure
+           (lambda _
+             (chdir "build/generic")
+             (substitute* "configure"
+               (("#! /bin/sh") (string-append "#!" (which "sh")))))))
        ;; No 'check' target.
        #:tests? #f))
     (home-page "https://www.xvid.com/")
@@ -2147,3 +2147,49 @@ practically any type of media.")
     (description "Shared library for mediainfo.")
     (license license:bsd-2)))
 
+;; TODO also have a GUI version available
+(define-public mediainfo
+  (package
+    (name "mediainfo")
+    (version "0.7.95")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://mediaarea.net/download/source/"
+                                  name
+                                  "/"
+                                  version
+                                  "/"
+                                  name
+                                  "_"
+                                  version
+                                  ".tar.bz2"))
+              (file-name (string-append name "-" version ".tar.bz2"))
+              (sha256
+               (base32
+                "0dy51a3i79jppmg1gi4f6h7jx4hcgnkmfim4d7d3gmnlbkjh8anv"))))
+    (native-inputs
+     `(("autoconf" ,autoconf)
+       ("automake" ,automake)
+       ("libtool" ,libtool)
+       ("pkg-config" ,pkg-config)
+       ("zlib" ,zlib)
+       ("libmediainfo", libmediainfo)
+       ("libzen" ,libzen)))
+    (build-system gnu-build-system)
+    (arguments
+     '(#:tests? #f ; lacks tests
+       #:phases
+       ;; build scripts not in root of archive
+       (modify-phases %standard-phases
+         (add-before
+             'configure 'pre-configure
+           (lambda _
+             (chdir "Project/GNU/CLI")))
+         (add-before 'configure 'autogen
+           (lambda _
+             (zero? (system* "./autogen.sh")))))))
+    (home-page "https://mediaarea.net/en/MediaInfo")
+    (synopsis "Display media tags")
+    (description "MediaInfo is a convenient unified display of the most
+relevant technical and tag data for video and audio files.")
+    (license license:bsd-2)))
-- 
2.13.0

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.