diff options
Diffstat (limited to 'gnu/packages/gnome.scm')
| -rw-r--r-- | gnu/packages/gnome.scm | 656 |
1 files changed, 549 insertions, 107 deletions
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm index 2e5f129a07..cadd4d0655 100644 --- a/gnu/packages/gnome.scm +++ b/gnu/packages/gnome.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr> -;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net> ;;; Copyright © 2014, 2016 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014, 2015 Federico Beffa <beffa@fbengineering.ch> @@ -11,7 +11,7 @@ ;;; Copyright © 2015, 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2015, 2016, 2017, 2018 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2015 David Thompson <davet@gnu.org> -;;; Copyright © 2015, 2016, 2017, 2018, 2019 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016, 2017, 2018 Rene Saavedra <pacoon@protonmail.com> ;;; Copyright © 2016 Jochem Raat <jchmrt@riseup.net> ;;; Copyright © 2016, 2017, 2019 Kei Kebreau <kkebreau@posteo.net> @@ -34,7 +34,7 @@ ;;; Copyright © 2018 Björn Höfling <bjoern.hoefling@bjoernhoefling.de> ;;; Copyright © 2018, 2019 Timothy Sample <samplet@ngyro.com> ;;; Copyright © 2019 Danny Milosavljevic <dannym@scratchpost.org> -;;; Copyright © 2019 Marius Bakke <mbakke@fastmail.com> +;;; Copyright © 2019, 2020 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2019 Florian Pelz <pelzflorian@pelzflorian.de> ;;; Copyright © 2019 Giacomo Leidi <goodoldpaul@autistici.org> ;;; Copyright © 2019 Jelle Licht <jlicht@fsfe.org> @@ -165,13 +165,11 @@ #:use-module (gnu packages virtualization) #:use-module (gnu packages vpn) #:use-module (gnu packages web) - #:use-module (gnu packages web) #:use-module (gnu packages webkit) #:use-module (gnu packages xdisorg) #:use-module (gnu packages xiph) #:use-module (gnu packages xml) #:use-module (gnu packages xorg) - #:use-module (gnu packages xorg) #:use-module (gnu artwork) #:use-module (guix build-system cargo) #:use-module (guix build-system cmake) @@ -335,6 +333,131 @@ It has miners for Facebook, Flickr, Google, ownCloud and SkyDrive.") (home-page "https://wiki.gnome.org/Projects/GnomeOnlineMiners") (license license:gpl2+))) +(define-public gssdp + (package + (name "gssdp") + (version "1.2.2") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "195hi10vrsvh6i927mm6rm1ld5sxah3h5sr3bsjm90vb8lxrxfya")))) + (build-system meson-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk-doc" ,gtk-doc) + ("pkg-config" ,pkg-config) + ("vala" ,vala))) + (inputs + `(("gtk+" ,gtk+) + ("libsoup" ,libsoup))) + (synopsis "GObject-based API over @acronym{SSDP, Simple Service Discovery +Protocol} for GNOME") + (description "This package provides a library to handle resource discovery +and announcement over @acronym{SSDP, Simple Service Discovery Protocol} and +a debugging tool, @command{gssdp-device-sniffer}.") + (home-page "https://gitlab.gnome.org/GNOME/gssdp") + (license license:lgpl2.0+))) + +(define-public gupnp + (package + (name "gupnp") + (version "1.2.2") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "12cr3isww4zl0d4himpd2fhl2wmy3jh8sbxp4snp51sw7savv04s")))) + (build-system meson-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk-doc" ,gtk-doc) + ("pkg-config" ,pkg-config) + ("vala" ,vala))) + (inputs + `(("gssdp" ,gssdp) + ("gtk+" ,gtk+) + ("libsoup" ,libsoup))) + (synopsis "PnP API for GNOME") + (description "This package provides GUPnP, an object-oriented framework +for creating UPnP devices and control points, written in C using +@code{GObject} and @code{libsoup}.") + (home-page "https://gitlab.gnome.org/GNOME/gupnp") + (license license:lgpl2.0+))) + +(define-public gupnp-dlna + (package + (name "gupnp-dlna") + (version "0.10.5") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "0spzd2saax7w776p5laixdam6d7smyynr9qszhbmq7f14y13cghj")))) + (build-system gnu-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk-doc" ,gtk-doc) + ("libxml" ,libxml2) + ("pkg-config" ,pkg-config) + ("vala" ,vala))) + (inputs + `(("gstreamer" ,gstreamer) + ("gupnp" ,gupnp))) + (propagated-inputs + `(("gst-plugins-base" ,gst-plugins-base) + ("gst-plugins-good" ,gst-plugins-good))) + (synopsis "GUPnP DLNA for GNOME") + (description "This package provides a small utility library to +support DLNA-related tasks such as media profile guessing, transcoding to a +given profile, etc. DLNA is a subset of UPnP A/V.") + (home-page "https://gitlab.gnome.org/GNOME/gupnp-dlna") + (license license:lgpl2.0+))) + +(define-public gupnp-av + (package + (name "gupnp-av") + (version "0.12.11") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "1p3grslwqm9bc8rmpn4l48d7v9s84nina4r9xbd932dbj8acz7b8")))) + (build-system gnu-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk-doc" ,gtk-doc) + ("libxml" ,libxml2) + ("pkg-config" ,pkg-config))) + (inputs + `(("gtk+" ,gtk+) + ("gupnp" ,gupnp))) + (synopsis "GUPnP A/V for GNOME") + (description "This package provides a small library for handling +and implementation of UPnP A/V profiles.") + (home-page "https://gitlab.gnome.org/GNOME/gupnp-av") + (license license:lgpl2.0+))) + (define-public libmediaart (package (name "libmediaart") @@ -364,6 +487,241 @@ extraction, and lookup for applications on the desktop.") (home-page "https://gitlab.gnome.org/GNOME/libmediaart") (license license:lgpl2.1+))) +(define-public gnome-initial-setup + (package + (name "gnome-initial-setup") + (version "3.32.1") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/gnome-initial-setup/" + (version-major+minor version) + "/gnome-initial-setup-" version ".tar.xz")) + (sha256 + (base32 + "1gwhp7dalyc8zsb2pa66cmpdrj2d6drbq5p331sq6zp8ds10k9ry")))) + (build-system meson-build-system) + (arguments + '(#:configure-flags '(;; Enable camera support for user selfie. + "-Dcheese=auto" + "-Dsystemd=false"))) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk+:bin" ,gtk+ "bin") + ("pkg-config" ,pkg-config))) + (inputs + `(("accountsservice" ,accountsservice) + ;("adwaita-icon-theme" ,adwaita-icon-theme) + ("gdm" ,gdm) + ("geoclue" ,geoclue) + ("gnome-desktop" ,gnome-desktop) + ("gnome-getting-started-docs" ,gnome-getting-started-docs) + ("gnome-online-accounts" ,gnome-online-accounts) + ("gnome-online-accounts:lib" ,gnome-online-accounts "lib") + ("gstreamer" ,gstreamer) + ("ibus" ,ibus) + ("json-glib" ,json-glib) + ("krb5" ,mit-krb5) + ("libgweather" ,libgweather) + ("libsecret" ,libsecret) + ("network-manager" ,network-manager) + ("network-manager-applet" ,network-manager-applet) + ("packagekit" ,packagekit) + ("polkit" ,polkit) + ("pwquality" ,libpwquality) + ("rest" ,rest) + ("upower" ,upower) + ("webkitgtk" ,webkitgtk))) + (synopsis "Initial setup wizard for GNOME desktop") + (description "This package provides a set-up wizard when a +user logs into GNOME for the first time. It typically provides a +tour of all gnome components and allows the user to set them up.") + (home-page "https://gitlab.gnome.org/GNOME/gnome-initial-setup") + (license license:gpl2))) + +(define-public gnome-user-share + (package + (name "gnome-user-share") + (version "3.33.1") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "0lf790pyamdyj7180ils8vizjl8brxcg7jsm1iavfp9ay4wa8mz7")))) + (build-system meson-build-system) + (arguments + `(#:glib-or-gtk? #t + #:configure-flags + `("-Dsystemd=false" + ;; Enable nautilus extension for file sharing. + "-Dnautilus_extension=true"))) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk+:bin" ,gtk+ "bin") + ("pkg-config" ,pkg-config) + ("yelp-tools" ,yelp-tools))) + (inputs + `(("glib" ,glib) + ("gnome-bluetooth" ,gnome-bluetooth) + ("gtk+" ,gtk+) + ("libcanberra" ,libcanberra) + ("libnotify" ,libnotify) + ("nautilus" ,nautilus))) ; For nautilus extension. + (synopsis "File sharing for GNOME desktop") + (description "GNOME User Share is a small package that binds together +various free software projects to bring easy to use user-level file +sharing to the masses.") + (home-page "https://gitlab.gnome.org/GNOME/gnome-user-share") + (license license:gpl2+))) + +(define-public sushi + (package + (name "sushi") + (version "3.32.1") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "02idvqjk76lii9xyg3b1yz4rw721709bdm5j8ikjym6amcghl0aj")))) + (build-system meson-build-system) + (arguments + `(#:glib-or-gtk? #t + #:phases + (modify-phases %standard-phases + (add-after 'glib-or-gtk-wrap 'wrap-typelib + (lambda* (#:key outputs #:allow-other-keys) + (let ((prog (string-append (assoc-ref outputs "out") + "/bin/sushi"))) + ;; Put existing typelibs before sushi's deps, so as to correctly + ;; infer gdk-pixbuf + (wrap-program prog + `("GI_TYPELIB_PATH" suffix (,(getenv "GI_TYPELIB_PATH")))) + #t)))))) + (native-inputs + `(("glib:bin" ,glib "bin") + ("gettext" ,gettext-minimal) + ("gobject-introspection" ,gobject-introspection) + ("pkg-config" ,pkg-config))) + (inputs + `(("clutter" ,clutter) + ("clutter-gst" ,clutter-gst) + ("clutter-gtk" ,clutter-gtk) + ("evince" ,evince) ; For file previewing. + ("freetype" ,freetype) + ("gdk-pixbuf" ,gdk-pixbuf) + ("gjs" ,gjs) + ("gst-plugins-base" ,gst-plugins-base) + ("gstreamer" ,gstreamer) + ("gtksourceview" ,gtksourceview-3) + ("harfbuzz" ,harfbuzz) + ("libepoxy" ,libepoxy) + ("libmusicbrainz" ,libmusicbrainz) + ("libxml2" ,libxml2) + ("neon" ,neon) + ("webkitgtk" ,webkitgtk))) + (synopsis "File previewer for the GNOME desktop") + (description "Sushi is a DBus-activated service that allows applications to +preview files on the GNOME desktop.") + (home-page "https://gitlab.gnome.org/GNOME/sushi") + (license license:gpl2+))) + +(define-public rygel + (package + (name "rygel") + (version "0.38.3") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "003xficqb08r1dgid20i7cn889lbfwrglpx78rjd5nkvgxbimhh8")))) + (build-system gnu-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("gobject-introspection" ,gobject-introspection) + ("gtk-doc" ,gtk-doc) + ("pkg-config" ,pkg-config) + ("vala" ,vala))) + (inputs + `(("gdk-pixbuf" ,gdk-pixbuf) + ("gssdp" ,gssdp) + ("gstreamer" ,gstreamer) + ("gst-plugins-base" ,gst-plugins-base) + ("gtk+" ,gtk+) + ("gupnp" ,gupnp) + ("gupnp-av" ,gupnp-av) + ("gupnp-dlna" ,gupnp-dlna) + ("libgee" ,libgee) + ("libmediaart" ,libmediaart) + ("libsoup" ,libsoup) + ("libxslt" ,libxslt) + ("libunistring" ,libunistring) + ("tracker" ,tracker))) + (synopsis "Share audio, video, and pictures with other devices") + (description + "Rygel is a home media solution (@dfn{UPnP AV MediaServer and +MediaRenderer}) for GNOME that allows you to easily share audio, video, and +pictures, and to control a media player on your home network. + +Rygel achieves interoperability with other devices by trying to conform to the +strict requirements of DLNA and by converting media on-the-fly to formats that +client devices can handle.") + (home-page "https://wiki.gnome.org/Projects/Rygel") + (license (list + ;; For logo (data/icons/*). + license:cc-by-sa3.0 + ;; For all others. + license:lgpl2.1+)))) + +(define-public libnma + (package + (name "libnma") + (version "1.8.26") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "1w9lld38risnk1krknfwln24kabdxnj274pyz4jhndphwigrshaf")))) + (build-system meson-build-system) + (arguments + `(#:glib-or-gtk? #t)) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gtk-doc" ,gtk-doc) + ("gobject-introspection" ,gobject-introspection) + ("pkg-config" ,pkg-config))) + (inputs + `(("adwaita-icon-theme" ,adwaita-icon-theme) + ("gcr" ,gcr) + ("gtk+" ,gtk+) + ("iso-codes" ,iso-codes) + ("mobile-broadband-provider-info" ,mobile-broadband-provider-info) + ("network-manager" ,network-manager))) + (synopsis "Network Manager's applet library") + (description "Libnma is an applet library for Network Manager. It was +initially part of network-manager-applet and has now become a separate +project.") + (home-page "https://gitlab.gnome.org/GNOME/libnma") + + ;; Some files carry the "GPL-2.0+" SPDX identifier while others say + ;; "LGPL-2.1+". + (license license:gpl2+))) + (define-public gnome-menus (package (name "gnome-menus") @@ -1144,7 +1502,7 @@ forgotten when the session ends.") "05q6v9lssd21623mnj2p49clj9v9csw9kay7n4nklki025grbh1w")))) (build-system glib-or-gtk-build-system) (arguments - `(#:configure-flags '("--disable-nautilus") + `(#:configure-flags '("--disable-nautilus" "--enable-introspection") #:phases (modify-phases %standard-phases (add-before 'install 'skip-gtk-update-icon-cache @@ -1188,6 +1546,7 @@ forgotten when the session ends.") `(("itstool" ,itstool) ("intltool" ,intltool) ("glib" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) ("pkg-config" ,pkg-config) ("xmllint" ,libxml2))) (home-page @@ -1522,7 +1881,7 @@ some form of information without getting in the user's way.") (define-public libpeas (package (name "libpeas") - (version "1.22.0") + (version "1.24.1") (source (origin (method url-fetch) @@ -1531,8 +1890,19 @@ some form of information without getting in the user's way.") name "-" version ".tar.xz")) (sha256 (base32 - "0qm908kisyjzjxvygdl18hjqxvvgkq9w0phs2g55pck277sw0bsv")))) - (build-system gnu-build-system) + "1162dr7smmfb02czmhshr0f93hqj7w0nw29bys5lzfvwarxcyflw")))) + (build-system meson-build-system) + (arguments + '(#:phases + (modify-phases %standard-phases + (add-before 'check 'start-xserver + (lambda* (#:key inputs #:allow-other-keys) + (let ((xorg-server (assoc-ref inputs "xorg-server")) + (disp ":1")) + (setenv "DISPLAY" disp) + ;; Tests require a running X server. + (system (format #f "~a/bin/Xvfb ~a &" xorg-server disp)) + #t)))))) (inputs `(("gtk+" ,gtk+) ("glade" ,glade3) @@ -1540,9 +1910,10 @@ some form of information without getting in the user's way.") ("python-pygobject" ,python-pygobject))) (native-inputs `(("pkg-config" ,pkg-config) + ("gettext" ,gettext-minimal) ("glib:bin" ,glib "bin") ("gobject-introspection" ,gobject-introspection) - ("intltool" ,intltool))) + ("xorg-server" ,xorg-server-for-tests))) (propagated-inputs ;; The .pc file "Requires" gobject-introspection. `(("gobject-introspection" ,gobject-introspection))) @@ -1811,77 +2182,76 @@ from forcing GEXP-PROMISE." (lambda (crate) (delete-file-recursively (string-append "vendor/" (car crate))) (invoke "tar" "xvf" (cdr crate) "-C" "vendor")) - '( -;; aho-corasick 0.7 + '(("aho-corasick" . #+(package-source rust-aho-corasick-0.7)) ;; alga 0.9 -;; approx 0.3 -;; arrayvec 0.4 + ("approx" . #+(package-source rust-approx-0.3)) + ("arrayvec" . #+(package-source rust-arrayvec-0.4)) ("atty" . #+(package-source rust-atty-0.2)) ("autocfg" . #+(package-source rust-autocfg-0.1)) ("bitflags" . #+(package-source rust-bitflags-1)) ;; block 0.1 -;; bstr 0.2 -;; byteorder 1.3 + ("bstr" . #+(package-source rust-bstr-0.2)) + ("byteorder" . #+(package-source rust-byteorder-1.3)) ;; cairo-rs 0.7 ;; cairo-sys-rs 0.9 -;; cast 0.2 + ("cast" . #+(package-source rust-cast-0.2)) ("cfg-if" . #+(package-source rust-cfg-if-0.1)) ("clap" . #+(package-source rust-clap-2)) - ;("cloudabi" . #+(package-source rust-cloudabi-0.0)) -;; criterion 0.2 -;; criterion-plot 0.3 -;; crossbeam-deque 0.7 -;; crossbeam-epoch 0.7 -;; crossbeam-queue 0.1 -;; crossbeam-utils 0.6 + ("cloudabi" . #+(package-source rust-cloudabi-0.0)) + ("criterion" . #+(package-source rust-criterion-0.2)) + ("criterion-plot" . #+(package-source rust-criterion-plot-0.3)) + ("crossbeam-deque" . #+(package-source rust-crossbeam-deque-0.7)) + ("crossbeam-epoch" . #+(package-source rust-crossbeam-epoch-0.8)) + ("crossbeam-queue" . #+(package-source rust-crossbeam-queue-0.2)) + ("crossbeam-utils" . #+(package-source rust-crossbeam-utils-0.7)) ;; cssparser 0.25 ;; cssparser-macros 0.3 -;; csv 1.1 -;; csv-core 0.1 + ("csv" . #+(package-source rust-csv-1.1)) + ("csv-core" . #+(package-source rust-csv-core-0.1)) ;; data-url 0.1 ;; downcast-rs 1.0 ("dtoa" . #+(package-source rust-dtoa-0.4)) ;; dtoa-short 0.3 -;; either 1.5 -;; encoding 0.2 -;; encoding-index-japanese 1.20141219.5 -;; encoding-index-korean 1.20141219.5 -;; encoding-index-simpchinese 1.20141219.5 -;; encoding-index-singlebyte 1.20141219.5 -;; encoding-index-tradchinese 1.20141219.5 -;; encoding_index_tests 0.1 + ("either" . #+(package-source rust-either-1.5)) + ("encoding" . #+(package-source rust-encoding-0.2)) + ("encoding-index-japanese" . #+(package-source rust-encoding-index-japanese-1.20141219)) + ("encoding-index-korean" . #+(package-source rust-encoding-index-korean-1.20141219)) + ("encoding-index-simpchinese" . #+(package-source rust-encoding-index-simpchinese-1.20141219)) + ("encoding-index-singlebyte" . #+(package-source rust-encoding-index-singlebyte-1.20141219)) + ("encoding-index-tradchinese" . #+(package-source rust-encoding-index-tradchinese-1.20141219)) + ("encoding_index_tests" . #+(package-source rust-encoding-index-tests-0.1)) ;; float-cmp 0.5 ;; fragile 0.3 - ;("fuchsia-cprng" . #+(package-source rust-fuchsia-cprng-0.1)) -;; futf 0.1 + ("fuchsia-cprng" . #+(package-source rust-fuchsia-cprng-0.1)) + ("futf" . #+(package-source rust-futf-0.1)) ;; gdk-pixbuf 0.7 ;; gdk-pixbuf-sys 0.9 -;; generic-array 0.12 + ("generic-array" . #+(package-source rust-generic-array-0.12)) ;; gio 0.7 ;; gio-sys 0.9 ;; glib 0.8 ;; glib-sys 0.9 ;; gobject-sys 0.9 -;; idna 0.2 -;; itertools 0.8 + ("idna" . #+(package-source rust-idna-0.2)) + ("itertools" . #+(package-source rust-itertools-0.8)) ("itoa" . #+(package-source rust-itoa-0.4)) - ;("language-tags" . #+(package-source rust-language-tags-0.2)) + ("language-tags" . #+(package-source rust-language-tags-0.2)) ("lazy_static" . #+(package-source rust-lazy-static-1.3)) ("libc" . #+(package-source rust-libc-0.2)) ;; libm 0.1 ;; locale_config 0.3 ("log" . #+(package-source rust-log-0.4)) -;; mac 0.1 + ("mac" . #+(package-source rust-mac-0.1)) ;; malloc_buf 0.0 ;; markup5ever 0.9 - ;("matches" . #+(package-source rust-matches-0.1)) + ("matches" . #+(package-source rust-matches-0.1)) ;; matrixmultiply 0.2 -;; memchr 2.2 -;; memoffset 0.5 + ("memchr" . #+(package-source rust-memchr-2.2)) + ("memoffset" . #+(package-source rust-memoffset-0.5)) ;; nalgebra 0.18 -;; new_debug_unreachable 1.0 + ("new_debug_unreachable" . #+(package-source rust-new-debug-unreachable-1.0)) ("nodrop" . #+(package-source rust-nodrop-0.1)) -;; num-complex 0.2 + ("num-complex" . #+(package-source rust-num-complex-0.2)) ("num-integer" . #+(package-source rust-num-integer-0.1)) ;; num-rational 0.2 ("num-traits" . #+(package-source rust-num-traits-0.2)) @@ -1894,16 +2264,16 @@ from forcing GEXP-PROMISE." ;; pangocairo 0.8 ;; pangocairo-sys 0.10 ("percent-encoding" . #+(package-source rust-percent-encoding-2.1)) -;; phf 0.7.24 -;; phf_codegen 0.7.24 -;; phf_generator 0.7.24 -;; phf_shared 0.7.24 - ;("pkg-config" . #+(package-source rust-pkg-config-0.3)) -;; precomputed-hash 0.1 + ("phf" . #+(package-source rust-phf-0.7)) + ("phf_codegen" . #+(package-source rust-phf-codegen-0.7)) + ("phf_generator" . #+(package-source rust-phf-generator-0.7)) + ("phf_shared" . #+(package-source rust-phf-shared-0.7)) + ("pkg-config" . #+(package-source rust-pkg-config-0.3)) + ("precomputed-hash" . #+(package-source rust-precomputed-hash-0.1)) ("proc-macro2" . #+(package-source rust-proc-macro2-1.0)) ;; procedural-masquerade 0.1 ("quote" . #+(package-source rust-quote-1.0)) - ;("rand" . #+(package-source rust-rand-0.6)) + ("rand" . #+(package-source rust-rand-0.6)) ("rand_chacha" . #+(package-source rust-rand-chacha-0.1)) ("rand_core-0.3.1" . #+(package-source rust-rand-core-0.3)) ("rand_core" . #+(package-source rust-rand-core-0.4)) @@ -1913,46 +2283,46 @@ from forcing GEXP-PROMISE." ("rand_os" . #+(package-source rust-rand-os-0.1)) ("rand_pcg" . #+(package-source rust-rand-pcg-0.1)) ("rand_xorshift" . #+(package-source rust-rand-xorshift-0.1)) -;; rand_xoshiro 0.1 - ;("rawpointer" . #+(package-source rust-rawpointer-0.1)) -;; rayon 1.2 -;; rayon-core 1.6 + ("rand_xoshiro" . #+(package-source rust-rand-xoshiro-0.1)) +;; rawpointer 0.2 + ("rayon" . #+(package-source rust-rayon-1.3)) + ("rayon-core" . #+(package-source rust-rayon-core-1.7)) ;; rctree 0.3 ("rdrand" . #+(package-source rust-rdrand-0.4)) -;; regex 1.3 -;; regex-automata 0.1 - ;("regex-syntax" . #+(package-source rust-regex-syntax-0.6)) -;; rustc_version 0.2 + ("regex" . #+(package-source rust-regex-1.3)) + ("regex-automata" . #+(package-source rust-regex-automata-0.1)) + ("regex-syntax" . #+(package-source rust-regex-syntax-0.6)) + ("rustc_version" . #+(package-source rust-rustc-version-0.2)) ("ryu" . #+(package-source rust-ryu-1.0)) ("same-file" . #+(package-source rust-same-file-1.0)) ("scopeguard" . #+(package-source rust-scopeguard-1.0)) -;; semver 0.9 - ;("semver-parser" . #+(package-source rust-semver-parser-0.7)) + ("semver" . #+(package-source rust-semver-0.9)) + ("semver-parser" . #+(package-source rust-semver-parser-0.7)) ("serde" . #+(package-source rust-serde-1.0)) ("serde_derive" . #+(package-source rust-serde-derive-1.0)) ("serde_json" . #+(package-source rust-serde-json-1.0)) -;; siphasher 0.2 -;; smallvec 0.6 -;; string_cache 0.7 -;; string_cache_codegen 0.4 -;; string_cache_shared 0.3 + ("siphasher" . #+(package-source rust-siphasher-0.2)) + ("smallvec" . #+(package-source rust-smallvec-0.6)) + ("string_cache" . #+(package-source rust-string-cache-0.7)) + ;("string_cache_codegen" . #+(package-source rust-string-cache-codegen-0.4)) + ("string_cache_shared" . #+(package-source rust-string-cache-shared-0.3)) ("syn" . #+(package-source rust-syn-1.0)) -;; tendril 0.4 + ("tendril" . #+(package-source rust-tendril-0.4)) ("textwrap" . #+(package-source rust-textwrap-0.11)) - ;("thread_local" . #+(package-source rust-thread-local-0.3)) -;; tinytemplate 1.0 - ;("typenum" . #+(package-source rust-typenum-1.10)) -;; unicode-bidi 0.3 -;; unicode-normalization 0.1 + ("thread_local" . #+(package-source rust-thread-local-1.0)) + ("tinytemplate" . #+(package-source rust-tinytemplate-1.0)) + ("typenum" . #+(package-source rust-typenum-1.10)) + ("unicode-bidi" . #+(package-source rust-unicode-bidi-0.3)) + ("unicode-normalization" . #+(package-source rust-unicode-normalization-0.1)) ("unicode-width" . #+(package-source rust-unicode-width-0.1)) ("unicode-xid" . #+(package-source rust-unicode-xid-0.2)) -;; url 2.1 -;; utf-8 0.7 + ("url" . #+(package-source rust-url-2.1)) + ("utf-8" . #+(package-source rust-utf-8-0.7)) ("walkdir" . #+(package-source rust-walkdir-2.2)) ("winapi" . #+(package-source rust-winapi-0.3)) - ;("winapi-i686-pc-windows-gnu" . #+(package-source rust-winapi-i686-pc-windows-gnu-0.4)) + ("winapi-i686-pc-windows-gnu" . #+(package-source rust-winapi-i686-pc-windows-gnu-0.4)) ("winapi-util" . #+(package-source rust-winapi-util-0.1)) - ;("winapi-x86_64-pc-windows-gnu" . #+(package-source rust-winapi-x86-64-pc-windows-gnu-0.4)) + ("winapi-x86_64-pc-windows-gnu" . #+(package-source rust-winapi-x86-64-pc-windows-gnu-0.4)) ;; xml-rs 0.8 ))) (format #t "Replacing vendored crates in the tarball and repacking ...~%") @@ -3805,7 +4175,20 @@ faster results and to avoid unnecessary server load.") (sha256 (base32 "1vxxvmz2cxb1qy6ibszaz5bskqdy9nd9fxspj9fv3gfmrjzzzdb4")) - (patches (search-patches "upower-builddir.patch")))) + (patches (search-patches "upower-builddir.patch")) + (modules '((guix build utils))) + (snippet + '(begin + ;; Upstream commit + ;; <https://cgit.freedesktop.org/upower/commit/?id=18457c99b68786cd729b315723d680e6860d9cfa> + ;; moved 'dbus-1/system.d' from etc/ to share/. However, + ;; 'dbus-configuration-directory' in (gnu services dbus) + ;; expects it in etc/. Thus, move it back to its previous + ;; location. + (substitute* "src/Makefile.in" + (("^dbusconfdir =.*$") + "dbusconfdir = $(sysconfdir)/dbus-1/system.d\n")) + #t)))) (build-system glib-or-gtk-build-system) (arguments '( ;; The tests want to contact the system bus, which can't be done in the @@ -4472,7 +4855,7 @@ for application developers.") (define-public grilo-plugins (package (name "grilo-plugins") - (version "0.3.3") + (version "0.3.10") (source (origin (method url-fetch) @@ -4481,44 +4864,41 @@ for application developers.") name "-" version ".tar.xz")) (sha256 (base32 - "172vr1y98d2mzlmg5akjn4ibrcj3gh22cwnb3cv9rvvzhj3yhrpy")))) - (build-system gnu-build-system) + "0jldaixc4kzycn5v8ixkjld1n0z3dp0l1p3vchgdwpvdvc7kcfw0")))) + (build-system meson-build-system) (native-inputs - `(("glib:bin" ,glib "bin") ; for glib-mkenums and glib-genmarshal - ("intltool" ,intltool) + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gtk+:bin" ,gtk+ "bin") ("itstool" ,itstool) ("pkg-config" ,pkg-config))) + ;; TODO: ahavi, gstreamer (inputs `(("grilo" ,grilo) - ("glib" ,glib) - ("libxml2" ,libxml2) - ("sqlite" ,sqlite) + ;("gmime" ,gmime) ; unused + ("gnome-online-accounts:lib" ,gnome-online-accounts "lib") ("gom" ,gom) - ;; XXX TODO: Add oauth - ;; XXX TODO: Add goa - ;; XXX TODO: Add gdata (e.g. needed for youtube plugin) - ;; XXX TODO: Add lua (needs help finding it) + ;("gssdp" ,gssdp) ; unused + ;("gupnp" ,gupnp) ; unused + ;("gupnp-av" ,gupnp-av) ; unused ("json-glib" ,json-glib) ("avahi" ,avahi) - ("gmime" ,gmime) + ("libgdata" ,libgdata) + ("libmediaart" ,libmediaart) + ;("librest" ,rest) ; unused ("libsoup" ,libsoup) - ("libarchive" ,libarchive) - ("totem-pl-parser" ,totem-pl-parser))) + ("totam-pl-parser" ,totem-pl-parser) + ("tracker" ,tracker))) ; unused because it's too old (arguments - `(#:make-flags (list (string-append "GRL_PLUGINS_DIR=" - %output - "/lib/grilo-" - ,(version-major+minor version))) - ;; XXX FIXME: Try to get the test suite working. It appears to require - ;; a working system dbus. Inside the build container, all tests fail - ;; with: "assertion failed: (source)". Outside of the build container, - ;; most tests succeed. - #:tests? #f)) + `(#:glib-or-gtk? #t + ;;Disable lua-factory as it needs missing dependencies + #:configure-flags '("-Denable-lua-factory=no"))) (home-page "https://live.gnome.org/Grilo") (synopsis "Plugins for the Grilo media discovery library") (description "Grilo is a framework focused on making media discovery and browsing easy -for application developers.") +for application developers. This package provides plugins for common media +discovery protocols.") (license license:lgpl2.1+))) (define-public totem @@ -6007,7 +6387,7 @@ Evolution (hence the name), but is now used by other packages as well.") ("gobject-introspection" ,gobject-introspection) ("intltool" ,intltool) ("pkg-config" ,pkg-config) - ("python" ,python-2) ; incompatible with Python 3 (print syntax) + ("python" ,python) ("vala" ,vala) ("xsltproc" ,libxslt))) (propagated-inputs @@ -6020,7 +6400,7 @@ Evolution (hence the name), but is now used by other packages as well.") `(("clutter" ,clutter) ("dconf" ,dconf) ("gtk+-2" ,gtk+-2) - ("python-pygobject" ,python2-pygobject))) + ("python-pygobject" ,python-pygobject))) (synopsis "Text entry and UI navigation application") (home-page "https://wiki.gnome.org/Projects/Caribou") (description @@ -7397,6 +7777,68 @@ associations for GNOME.") (license license:gpl3+) (home-page #f))) +(define-public libgovirt + (package + (name "libgovirt") + (version "0.3.6") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "19pb71pag3vsi83kbv8h08kimwym4hpw36kjl6a5ik5nk50mc8sg")))) + (build-system glib-or-gtk-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gsettings-desktop-schemas" ,gsettings-desktop-schemas) + ("gtk+:bin" ,gtk+ "bin") + ("pkg-config" ,pkg-config))) + (inputs + `(("glib-networking" ,glib-networking) ; GIO plugin--for the tests + ("librest" ,rest))) + (synopsis "GoVirt Library") + (description "GoVirt is a GObject wrapper for the oVirt REST API.") + (home-page "https://gitlab.gnome.org/GNOME/libgovirt") + (license license:gpl2+))) + +(define-public gnome-weather + (package + (name "gnome-weather") + (version "3.34.0") + (source (origin + (method url-fetch) + (uri (string-append "mirror://gnome/sources/" name "/" + (version-major+minor version) "/" + name "-" version ".tar.xz")) + (sha256 + (base32 + "1g63xzs17i36if923b36k9fwbk0nqa5vz6zh1k6q2axrzhhpx1i4")))) + (build-system meson-build-system) + (native-inputs + `(("gettext" ,gettext-minimal) + ("glib:bin" ,glib "bin") + ("gobject-introspection" ,gobject-introspection) + ("gtk+:bin" ,gtk+ "bin") + ("pkg-config" ,pkg-config))) + (inputs + `( ;("adwaita-icon-theme" ,adwaita-icon-theme) + ("appstream-glib" ,appstream-glib) + ("geoclue" ,geoclue) + ("gdk-pixbuf" ,gdk-pixbuf) + ("gjs" ,gjs) + ("gnome-desktop" ,gnome-desktop) + ("libgweather" ,libgweather))) + (synopsis "Weather monitoring for GNOME desktop") + (description "GNOME Weather is a small application that allows you to +monitor the current weather conditions for your city, or anywhere in the +world.") + (home-page "https://wiki.gnome.org/Apps/Weather") + (license license:gpl2+))) + (define-public gnome (package (name "gnome") @@ -7861,7 +8303,7 @@ functionality and behavior.") ("inkscape" ,inkscape) ("optipng" ,optipng) ("pkg-config" ,pkg-config) - ("sassc" ,sassc))) + ("sassc" ,sassc/libsass-3.5))) (synopsis "A flat GTK+ theme with transparent elements") (description "Arc is a flat theme with transparent elements for GTK 3, GTK 2, and GNOME Shell which supports GTK 3 and GTK 2 based desktop environments |