~ruther/guix-local: gnu: libmediainfo and mediainfo: Fix build.

a0b2b4f1e95b876cbf5a3b8ca25f901504fc1acf — Leo Famulari 3 years ago 5bcf108

gnu: libmediainfo and mediainfo: Fix build.

* gnu/packages/video.scm (libmediainfo, mediainfo)[arguments]: Add a shebang to
the autogen.sh script in the 'change-to-build-dir' phases.

patch browse .tar.gz .zip

1 files changed, 14 insertions(+), 0 deletions(-)

M gnu/packages/video.scm

M gnu/packages/video.scm => gnu/packages/video.scm +14 -0

@@ 4183,6 4183,13 @@ practically any type of media.")
          (add-after 'unpack 'change-to-build-dir
            (lambda _
              (chdir "Project/GNU/Library")
+             ;; XXX Add a shebang to the script to avoid an error like:
+             ;; "In execvp of ./autogen.sh: Exec format error"
+             ;; The string replaced is just a code comment.
+             ;; See the similar substitution made in mediainfo.
+             (substitute* "autogen.sh"
+               (("#libtoolize")
+                "#!/bin/sh"))
              #t)))))
     (home-page "https://mediaarea.net/en/MediaInfo")
     (synopsis "Library for retrieving media metadata")


@@ 4238,6 4245,13 @@ MPEG-2, MPEG-4, DVD (VOB)...
          (add-after 'unpack 'change-to-build-dir
            (lambda _
              (chdir "Project/GNU/CLI")
+             ;; XXX Add a shebang to the script to avoid an error like:
+             ;; "In execvp of ./autogen.sh: Exec format error"
+             ;; The string replaced is just a code comment.
+             ;; See the similar substitution made in libmediainfo.
+             (substitute* "autogen.sh"
+               (("#libtoolize")
+                "#!/bin/sh"))
              #t)))))
     (home-page "https://mediaarea.net/en/MediaInfo")
     (synopsis "Utility for reading media metadata")