diff options
Diffstat (limited to 'gnu/packages/glib.scm')
| -rw-r--r-- | gnu/packages/glib.scm | 85 |
1 files changed, 70 insertions, 15 deletions
diff --git a/gnu/packages/glib.scm b/gnu/packages/glib.scm index bacc63270a..cef6d7bea0 100644 --- a/gnu/packages/glib.scm +++ b/gnu/packages/glib.scm @@ -5,6 +5,8 @@ ;;; Copyright © 2014, 2015, 2016, 2017 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2016 Lukas Gradl <lgradl@openmailbox.org> +;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net> +;;; Copyright © 2017 Petter <petter@mykolab.ch> ;;; ;;; This file is part of GNU Guix. ;;; @@ -27,6 +29,7 @@ #:use-module (guix download) #:use-module (guix utils) #:use-module (guix build-system gnu) + #:use-module (guix build-system perl) #:use-module (guix build-system python) #:use-module (gnu packages) #:use-module (gnu packages base) @@ -62,12 +65,14 @@ itstool libsigc++ glibmm - telepathy-glib)) + telepathy-glib + perl-net-dbus + perl-net-dbus-glib)) (define dbus (package (name "dbus") - (version "1.10.22") + (version "1.10.24") (source (origin (method url-fetch) (uri (string-append @@ -75,7 +80,7 @@ version ".tar.gz")) (sha256 (base32 - "15vv9gz5i4f5l7h0d045qz5iyvl89hjk2k83lb4vbizd7qg41cg2")) + "06ydmrg76l1kwl3190d72zpiy3qxy248x6gskxbj9qiqfsr4w63i")) (patches (search-patches "dbus-helper-search-path.patch")))) (build-system gnu-build-system) (arguments @@ -137,7 +142,7 @@ shared NFS home directories.") (define glib (package (name "glib") - (version "2.52.3") + (version "2.54.1") (source (origin (method url-fetch) (uri (string-append "mirror://gnome/sources/" @@ -145,8 +150,9 @@ shared NFS home directories.") name "-" version ".tar.xz")) (sha256 (base32 - "0a71wkkhkvad84gm30w13micxxgqqw3sxhybj7nd9z60lwspdvi5")) - (patches (search-patches "glib-tests-timer.patch")))) + "18s7rw127wrvb107bkmxd1lmh62b2v19ww5rz7xi0krj34a1ph2h")) + (patches (search-patches "glib-respect-datadir.patch" + "glib-tests-timer.patch")))) (build-system gnu-build-system) (outputs '("out" ; everything "bin" ; glib-mkenums, gtester, etc.; depends on Python @@ -247,12 +253,7 @@ shared NFS home directories.") ("gio/tests/gdbus-unix-addresses.c" (;; Requires /etc/machine-id. - "/gdbus/x11-autolaunch")) - - ("glib/tests/gdatetime.c" - (;; Assumes that the Brasilian time zone is named 'BRT', - ;; which is no longer true as of tzdata-2017a. - "/GDateTime/new_full"))))) + "/gdbus/x11-autolaunch"))))) (and-map (lambda (x) (apply disable x)) failing-tests))))) ;; Note: `--docdir' and `--htmldir' are not honored, so work around it. @@ -284,19 +285,19 @@ shared NFS home directories.") and interfaces for such runtime functionality as an event loop, threads, dynamic loading, and an object system.") (home-page "https://developer.gnome.org/glib/") - (license license:lgpl2.0+))) ; some files are under lgpl2.1+ + (license license:lgpl2.1+))) (define gobject-introspection (package (name "gobject-introspection") - (version "1.52.1") + (version "1.54.1") (source (origin (method url-fetch) (uri (string-append "mirror://gnome/sources/" "gobject-introspection/" (version-major+minor version) "/gobject-introspection-" version ".tar.xz")) (sha256 - (base32 "1x5gkyrglv3dn9b4fsgw6asqgjw1wj7qc37g9pyac6pyaa6w7l1f")) + (base32 "0zl7pfkzkm07733391b4f3cwjbnvb1nwvpmajf5bajh6bxgfv3dq")) (modules '((guix build utils))) (snippet '(substitute* "tools/g-ir-tool-template.in" @@ -749,3 +750,57 @@ programming langauage. It also contains the utility reading and writing @uref{https://www.freedesktop.org/wiki/Distributions/AppStream,AppStream} metadata.") (license license:lgpl2.1+))) + +(define perl-net-dbus + (package + (name "perl-net-dbus") + (version "1.1.0") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://cpan/authors/id/D/DA/DANBERR/Net-DBus-" + version ".tar.gz")) + (sha256 + (base32 + "0sg2w147b9r9ykfzjs7y9qxry73xkjnhnk4qf95kfv79p5nnk4c3")))) + (build-system perl-build-system) + (native-inputs + `(("pkg-config" ,pkg-config) + ("perl-test-pod" ,perl-test-pod) + ("perl-test-pod-coverage" ,perl-test-pod-coverage))) + (inputs + `(("dbus" ,dbus))) + (propagated-inputs + `(("perl-xml-twig" ,perl-xml-twig))) + (home-page "http://search.cpan.org/dist/Net-DBus/") + (synopsis "Extension for the DBus bindings") + (description "@code{Net::DBus} provides a Perl XS API to the DBus +inter-application messaging system. The Perl API covers the core base level +of the DBus APIs, not concerning itself yet with the GLib or QT wrappers.") + (license license:perl-license))) + +(define perl-net-dbus-glib + (package + (name "perl-net-dbus-glib") + (version "0.33.0") + (source + (origin + (method url-fetch) + (uri (string-append "mirror://cpan/authors/id/D/DA/DANBERR/" + "Net-DBus-GLib-" version ".tar.gz")) + (sha256 + (base32 + "1z4mbv8z0rad604xahijpg5szzi8qak07hbahh230z4jf96fkxvj")))) + (build-system perl-build-system) + (native-inputs + `(("pkg-config" ,pkg-config))) + (inputs + `(("dbus-glib" ,dbus-glib))) + (home-page "http://search.cpan.org/~danberr/Net-DBus-GLib-0.33.0/") + (synopsis "Perl extension for the DBus GLib bindings") + (description "This package provides an extension to the @code{Net::DBus} +module allowing integration with the GLib mainloop. To integrate with the +main loop, simply get a connection to the bus via the methods in +@code{Net::DBus::GLib} rather than the usual @code{Net::DBus} module. Every +other API remains the same.") + (license license:gpl2+))) |