diff options
Diffstat (limited to 'gnu/packages/video.scm')
| -rw-r--r-- | gnu/packages/video.scm | 56 |
1 files changed, 49 insertions, 7 deletions
diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm index 368a01941b..ab4c76a11a 100644 --- a/gnu/packages/video.scm +++ b/gnu/packages/video.scm @@ -72,6 +72,7 @@ ;;; Copyright © 2024 aurtzy <aurtzy@gmail.com> ;;; Copyright © 2025 Formbi <formbi@protonmail.com> ;;; Copyright © 2025 Sharlatan Hellseher <sharlatanus@gmail.ccom> +;;; Copyright © 2025 VnPower <vnpower@loang.net> ;;; ;;; This file is part of GNU Guix. ;;; @@ -2833,9 +2834,14 @@ projects while introducing many more.") (list #:tests? #false ; no tests #:make-flags #~(list (string-append "PREFIX=" #$output) (string-append "CC=" #+(cc-for-target))) + #:modules '((guix build qt-build-system) + ((guix build gnu-build-system) #:prefix gnu:) + (guix build utils)) #:phases #~(modify-phases %standard-phases (delete 'configure) + (replace 'build (assoc-ref gnu:%standard-phases 'build)) + (replace 'install (assoc-ref gnu:%standard-phases 'install)) (add-after 'install 'wrap-executable (lambda* (#:key inputs outputs #:allow-other-keys) (let* ((out (assoc-ref outputs "out")) @@ -3011,6 +3017,31 @@ To load this plugin, specify the following option when starting mpv: @file{$HOME/.config/mpv/scripts}.") (license license:expat))) +(define-public mpvpaper + (package + (name "mpvpaper") + (version "1.8") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/GhostNaN/mpvpaper") + (commit version))) + (sha256 + (base32 "0pzc6f5r85qd0dgp6aa6pp8ba2m7ghzd3pc4xnqnarh2bx55jf95")) + (file-name (git-file-name name version)))) + (build-system meson-build-system) + (inputs + (list mpv libdisplay-info wlroots)) + (native-inputs + (list pkg-config cmake-minimal)) + (home-page "https://github.com/GhostNaN/mpvpaper") + (synopsis + "Video wallpaper program for wlroots-based wayland compositors") + (description "The mpvpaper package provides a wallpaper program for +wlroots-based wayland compositors, allowing you to play videos as your +wallpaper using mpv.") + (license license:gpl3))) + (define-public libvpx (package (name "libvpx") @@ -3226,7 +3257,7 @@ YouTube.com and many more sites.") (define-public yt-dlp (package (name "yt-dlp") - (version "2025.06.30") + (version "2025.07.21") (source (origin (method git-fetch) @@ -3238,7 +3269,7 @@ YouTube.com and many more sites.") (snippet '(substitute* "pyproject.toml" (("^.*Programming Language :: Python :: 3\\.13.*$") ""))) (sha256 - (base32 "14pk2rk5vm9469ghkvciaz74fihbl8dfi27qj6xnxv71hpm5w03p")))) + (base32 "051y9pb2imdrpi065d9l2xfmd68l22ahbz90z81yqv7kv84j9mal")))) (build-system pyproject-build-system) (arguments `(#:tests? ,(not (%current-target-system)) @@ -3272,7 +3303,17 @@ YouTube.com and many more sites.") (replace 'check (lambda* (#:key tests? test-flags #:allow-other-keys) (when tests? - (apply invoke "pytest" "-k" "not download" test-flags))))))) + (apply invoke "pytest" + "-k" + (string-append + "not download" + ;; TestHTTPRequestHandler tests are disabled due to + ;; https://github.com/yt-dlp/yt-dlp/issues/13927 + " and not " + "test_incompleteread" + " and not " + "test_partial_read_then_full_read") + test-flags))))))) (inputs (list ffmpeg python-brotli python-certifi python-mutagen @@ -4151,7 +4192,7 @@ be used for realtime video capture via Linux-specific APIs.") (build-system cmake-build-system) (arguments (list - #:cmake cmake-next ;needs cmake >= 3.28 + #:tests? #f #:configure-flags #~(let ((libdir (string-append (assoc-ref %outputs "out") "/lib"))) (list (string-append "-DOBS_VERSION_OVERRIDE=" #$version) @@ -5909,7 +5950,7 @@ It counts more than 100 plugins.") (define-public motion (package (name "motion") - (version "4.5.1") + (version "4.7.0") (home-page "https://motion-project.github.io/") (source (origin (method git-fetch) @@ -5918,7 +5959,7 @@ It counts more than 100 plugins.") (commit (string-append "release-" version)))) (sha256 (base32 - "09j919bba75d05rkqpib5rcmn1ff5nvn4ss8yy4fi6iz0lnacffx")) + "1pwsl1v0aqh5k5608siy0614lyf5bscy9a47ha8i5vqsbqxy4s3c")) (file-name (git-file-name name version)))) (build-system gnu-build-system) (native-inputs @@ -6112,7 +6153,8 @@ create smoother and stable videos.") qtsvg-5 zeromq)) (arguments - `(#:configure-flags + `(#:tests? #f + #:configure-flags (list (string-append "-DPYTHON_MODULE_PATH:PATH=" %output "/lib/python" ,(version-major+minor (package-version python)) "/site-packages") |