me/guix
Archived
1
0
Fork 0
Code Activity

gnu: totem: Use new package style.

Browse source 
* gnu/packages/gnome.scm (totem)[native-inputs]: Drop labels.
[arguments]: Convert to list of G-Expressions.  Drop trailing #t.
This commit is contained in:
Liliana Marie Prikler 2022-07-08 21:13:14 +02:00
parent 7e0440255f
commit 67d67b757d
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
1 changed files with 42 additions and 50 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
gnu/packages/gnome.scm
View file

@ -6138,14 +6138,14 @@ discovery protocols.")
(base32 "1az6ay7zhz2naqrzcfldx1yv2ylw1yjx76g3mqrqppwmvcflkw2a")))) (base32 "1az6ay7zhz2naqrzcfldx1yv2ylw1yjx76g3mqrqppwmvcflkw2a"))))
(build-system meson-build-system) (build-system meson-build-system)
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config) (list pkg-config
("desktop-file-utils" ,desktop-file-utils) desktop-file-utils
("gettext" ,gettext-minimal) gettext-minimal
("gobject-introspection" ,gobject-introspection) gobject-introspection
("glib:bin" ,glib "bin") ;for 'glib-mkenums' `(,glib "bin") ;for 'glib-mkenums'
("itstool" ,itstool) itstool
("xmllint" ,libxml2) libxml2
("xorg-server" ,xorg-server-for-tests))) xorg-server-for-tests))
(propagated-inputs (propagated-inputs
(list dconf)) (list dconf))
(inputs (inputs
@ -6176,37 +6176,30 @@ discovery protocols.")
grilo-plugins grilo-plugins
vala)) vala))
(arguments (arguments
`(#:glib-or-gtk? #t (list
#:glib-or-gtk? #t
;; Disable automatic GStreamer plugin installation via PackageKit and ;; Disable automatic GStreamer plugin installation via PackageKit and
;; all that. ;; all that.
#:configure-flags '("-D" "enable-easy-codec-installation=no" #:configure-flags #~(list "-Denable-easy-codec-installation=no"
;; Do not build .a files for the plugins, it's ;; Do not build .a files for the plugins, it's
;; completely useless. This saves 2 MiB. ;; completely useless. This saves 2 MiB.
"--default-library" "shared") "--default-library" "shared")
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'unpack 'skip-gtk-update-icon-cache (add-after 'unpack 'skip-gtk-update-icon-cache
;; Don't create 'icon-theme.cache'. ;; Don't create 'icon-theme.cache'.
(lambda _ (lambda _
(substitute* "meson_post_install.py" (substitute* "meson_post_install.py"
(("gtk-update-icon-cache") "true")) (("gtk-update-icon-cache") "true"))))
#t)) (add-before 'install 'disable-cache-generation
(add-before
'install 'disable-cache-generation
(lambda _ (lambda _
(setenv "DESTDIR" "/") (setenv "DESTDIR" "/")))
#t)) (add-before 'check 'pre-check
(add-before
'check 'pre-check
(lambda _ (lambda _
;; Tests require a running X server. ;; Tests require a running X server.
(system "Xvfb :1 &") (system "Xvfb :1 &")
(setenv "DISPLAY" ":1") (setenv "DISPLAY" ":1")))
#t)) (add-after 'install 'wrap-totem
(add-after
'install 'wrap-totem
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")) (let ((out (assoc-ref outputs "out"))
(gi-typelib-path (getenv "GI_TYPELIB_PATH")) (gi-typelib-path (getenv "GI_TYPELIB_PATH"))
@ -6217,8 +6210,7 @@ discovery protocols.")
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)) `("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path))
`("GRL_PLUGIN_PATH" ":" prefix (,grl-plugin-path))) `("GRL_PLUGIN_PATH" ":" prefix (,grl-plugin-path)))
(wrap-program (string-append out "/bin/totem-video-thumbnailer") (wrap-program (string-append out "/bin/totem-video-thumbnailer")
`("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)))) `("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,gst-plugin-path)))))))))
#t)))))
(home-page "https://wiki.gnome.org/Apps/Videos") (home-page "https://wiki.gnome.org/Apps/Videos")
(synopsis "Simple media player for GNOME based on GStreamer") (synopsis "Simple media player for GNOME based on GStreamer")
(description "Totem is a simple yet featureful media player for GNOME (description "Totem is a simple yet featureful media player for GNOME