HCoop / jackhill / guix / guix.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gnu: Add seahorse.
[jackhill/guix/guix.git] / gnu / packages / gnome.scm
CommitLineData
995b7261 1;;; GNU Guix --- Functional package management for GNU
109da1c0 2;;; Copyright © 2013, 2015 Andreas Enge <andreas@enge.fr>
eb497b66 3;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
29a7c98a 4;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
b38e45d8 5;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
58d32305 6;;; Copyright © 2014, 2015 Federico Beffa <beffa@fbengineering.ch>
6f96a359 7;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
88f70665 8;;; Copyright © 2015 Andy Wingo <wingo@igalia.com>
1e7464a9 9;;; Copyright © 2015 David Hashe <david.hashe@dhashe.com>
8ff49011 10;;; Copyright © 2015 Ricardo Wurmus <rekado@elephly.net>
995b7261
AE		 11;;;
12;;; This file is part of GNU Guix.
13;;;
14;;; GNU Guix is free software; you can redistribute it and/or modify it
15;;; under the terms of the GNU General Public License as published by
16;;; the Free Software Foundation; either version 3 of the License, or (at
17;;; your option) any later version.
18;;;
19;;; GNU Guix is distributed in the hope that it will be useful, but
20;;; WITHOUT ANY WARRANTY; without even the implied warranty of
21;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22;;; GNU General Public License for more details.
23;;;
24;;; You should have received a copy of the GNU General Public License
25;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
26
27(define-module (gnu packages gnome)
b5b73a82 28 #:use-module ((guix licenses) #:prefix license:)
995b7261
AE		 29 #:use-module (guix packages)
30 #:use-module (guix download)
29a7c98a 31 #:use-module (guix utils)
995b7261 32 #:use-module (guix build-system gnu)
121de2e1 33 #:use-module (guix build-system glib-or-gtk)
ed19903d 34 #:use-module (gnu packages)
75016d07 35 #:use-module (gnu packages autotools)
6a180f6f 36 #:use-module (gnu packages base)
5698b8b8 37 #:use-module (gnu packages bison)
23a22af6 38 #:use-module (gnu packages cups)
6e1bb642
SB		 39 #:use-module (gnu packages curl)
40 #:use-module (gnu packages databases)
121de2e1 41 #:use-module (gnu packages flex)
b4ce6300 42 #:use-module (gnu packages docbook)
995b7261 43 #:use-module (gnu packages glib)
c1354b90 44 #:use-module (gnu packages gnupg)
23a22af6 45 #:use-module (gnu packages gnuzilla)
85f5dc19 46 #:use-module (gnu packages gstreamer)
d9c1a22b 47 #:use-module (gnu packages gtk)
6b888eff 48 #:use-module (gnu packages guile)
c1354b90 49 #:use-module (gnu packages pdf)
75016d07 50 #:use-module (gnu packages polkit)
5698b8b8 51 #:use-module (gnu packages popt)
c1354b90 52 #:use-module (gnu packages ghostscript)
191e9b4e 53 #:use-module (gnu packages gnutls)
9cc98f8a 54 #:use-module (gnu packages iso-codes)
85f5dc19 55 #:use-module (gnu packages libcanberra)
88f70665 56 #:use-module (gnu packages linux)
75016d07 57 #:use-module (gnu packages libusb)
e55354b8 58 #:use-module (gnu packages image)
27477d2d 59 #:use-module (gnu packages perl)
995b7261 60 #:use-module (gnu packages pkg-config)
23a22af6 61 #:use-module (gnu packages pulseaudio)
995b7261 62 #:use-module (gnu packages python)
75016d07 63 #:use-module (gnu packages scanner)
85f5dc19 64 #:use-module (gnu packages xml)
200726ed 65 #:use-module (gnu packages gl)
1dd26275 66 #:use-module (gnu packages compression)
6e1bb642 67 #:use-module (gnu packages web)
fecbf86e 68 #:use-module (gnu packages xorg)
ea57378f 69 #:use-module (gnu packages xdisorg)
1e7464a9
DH		 70 #:use-module (gnu packages mail)
71 #:use-module (gnu packages backup)
72 #:use-module (gnu packages nettle)
c024ae36
RW		 73 #:use-module (gnu packages ncurses)
74 #:use-module (srfi srfi-1))
85f5dc19
AE		 75
76(define-public brasero
77 (package
78 (name "brasero")
79 (version "3.8.0")
80 (source (origin
81 (method url-fetch)
82 (uri (string-append "mirror://gnome/sources/brasero/3.8/brasero-"
83 version ".tar.xz"))
84 (sha256
85 (base32
86 "1r5wjsrm47amdaf862ymkdlwlb636c45wg14x20hdr99c653d2nr"))))
87 (build-system gnu-build-system)
88 (propagated-inputs
89 `(("hicolor-icon-theme" ,hicolor-icon-theme)))
9cc98f8a
CR		 90 (native-inputs
91 `(("intltool" ,intltool)
426adbe8 92 ("glib" ,glib "bin") ; glib-compile-schemas, etc.
9cc98f8a 93 ("pkg-config" ,pkg-config)))
85f5dc19
AE		 94 (inputs
95 `(("glib" ,glib)
96 ("gnome-doc-utils" ,gnome-doc-utils)
97 ("gstreamer" ,gstreamer)
98 ("gst-plugins-base" ,gst-plugins-base)
99 ("gtk+" ,gtk+)
85f5dc19
AE		 100 ("itstool" ,itstool)
101 ("libcanberra" ,libcanberra)
102 ("libice" ,libice)
103 ("libnotify" ,libnotify)
104 ("libsm" ,libsm)
c4c4cc05 105 ("libxml2" ,libxml2)))
85f5dc19
AE		 106 (home-page "https://projects.gnome.org/brasero/")
107 (synopsis "CD/DVD burning tool for Gnome")
108 (description "Brasero is an application to burn CD/DVD for the Gnome
109Desktop. It is designed to be as simple as possible and has some unique
110features to enable users to create their discs easily and quickly.")
1dd26275 111 (license license:gpl2+)))
995b7261 112
9cc98f8a
CR		 113(define-public gnome-desktop
114 (package
115 (name "gnome-desktop")
12f7f4aa 116 (version "3.16.0")
9cc98f8a
CR		 117 (source
118 (origin
119 (method url-fetch)
b38e45d8
EB		 120 (uri (string-append "mirror://gnome/sources/" name "/"
121 (version-major+minor version) "/"
9cc98f8a
CR		 122 name "-" version ".tar.xz"))
123 (sha256
124 (base32
12f7f4aa 125 "05lvik5cdh51xqd332qingph09zdhiaa1kqy9k2sk1simz4pvf8m"))))
9cc98f8a
CR		 126 (build-system gnu-build-system)
127 (native-inputs
128 `(("intltool" ,intltool)
129 ("pkg-config" ,pkg-config)))
130 (inputs
131 `(("gdk-pixbuf" ,gdk-pixbuf)
132 ("glib" ,glib)
133 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
134 ("gtk+" ,gtk+)
135 ("iso-codes" ,iso-codes)
136 ("itstool" ,itstool)
137 ("libx11" ,libx11)
138 ("libxext" ,libxext)
139 ("libxkbfile" ,libxkbfile)
140 ("libxrandr" ,libxrandr)
141 ("xkeyboard-config" ,xkeyboard-config)))
142 (home-page "https://www.gnome.org/")
143 (synopsis
35b9e423 144 "Libgnome-desktop, gnome-about, and desktop-wide documents")
9cc98f8a
CR		 145 (description
146 "The libgnome-desktop library provides API shared by several applications
35b9e423
EB		 147on the desktop, but that cannot live in the platform for various reasons.
148There is no API or ABI guarantee, although we are doing our best to provide
149stability. Documentation for the API is available with gtk-doc.
9cc98f8a
CR		 150
151The gnome-about program helps find which version of GNOME is installed.")
152 ; Some bits under the LGPL.
1dd26275 153 (license license:gpl2+)))
9cc98f8a 154
995b7261
AE		 155(define-public gnome-doc-utils
156 (package
157 (name "gnome-doc-utils")
158 (version "0.20.10")
159 (source
160 (origin
161 (method url-fetch)
b38e45d8
EB		 162 (uri (string-append "mirror://gnome/sources/" name "/"
163 (version-major+minor version) "/"
995b7261
AE		 164 name "-" version ".tar.xz"))
165 (sha256
166 (base32
167 "19n4x25ndzngaciiyd8dd6s2mf9gv6nv3wv27ggns2smm7zkj1nb"))))
168 (build-system gnu-build-system)
c4c4cc05 169 (native-inputs
995b7261 170 `(("intltool" ,intltool)
b4ce6300 171 ("docbook-xml" ,docbook-xml-4.4)
995b7261
AE		 172 ("libxml2" ,libxml2)
173 ("libxslt" ,libxslt)
174 ("pkg-config" ,pkg-config)
175 ("python-2" ,python-2)))
995b7261
AE		 176 (home-page "https://wiki.gnome.org/GnomeDocUtils")
177 (synopsis
178 "Documentation utilities for the Gnome project")
179 (description
180 "Gnome-doc-utils is a collection of documentation utilities for the
181Gnome project. It includes xml2po tool which makes it easier to translate
182and keep up to date translations of documentation.")
1dd26275 183 (license license:gpl2+))) ; xslt under lgpl
d9c1a22b 184
8ff49011
RW		 185(define-public gcr
186 (package
187 (name "gcr")
188 (version "3.16.0")
189 (source (origin
190 (method url-fetch)
191 (uri (string-append "mirror://gnome/sources/" name "/"
192 (version-major+minor version) "/"
193 name "-" version ".tar.xz"))
194 (sha256
195 (base32
196 "0xfhi0w358lvca1jjx24x2gm67mif33dsnmi9cv5i0f83ks8vzpc"))))
197 (build-system gnu-build-system)
198 (arguments
199 '(#:tests? #f ;25 of 598 tests fail because /var/lib/dbus/machine-id does
200 ;not exist
201 #:phases (modify-phases %standard-phases
202 (add-before
203 'check 'pre-check
204 (lambda* (#:key inputs #:allow-other-keys)
205 (substitute* "build/tap-driver"
206 (("/usr/bin/env python") (which "python"))))))))
207 (inputs
208 `(("dbus" ,dbus)
209 ("gnupg" ,gnupg) ;called as a child process during tests
210 ("libgcrypt" ,libgcrypt)))
211 (native-inputs
212 `(("python" ,python-2) ;for tests
213 ("pkg-config" ,pkg-config)
214 ("glib" ,glib "bin")
215 ("intltool" ,intltool)))
216 ;; mentioned in gck.pc, gcr.pc and gcr-ui.pc
217 (propagated-inputs
218 `(("p11-kit" ,p11-kit)
219 ("glib" ,glib)
220 ("gtk+" ,gtk+)))
221 (home-page "http://www.gnome.org")
222 (synopsis "Libraries for displaying certificates and accessing key stores")
223 (description
224 "The GCR package contains libraries used for displaying certificates and
225accessing key stores. It also provides the viewer for crypto files on the
226GNOME Desktop.")
227 (license license:lgpl2.1+)))
228
c1354b90
LC		 229(define-public libgnome-keyring
230 (package
231 (name "libgnome-keyring")
232 (version "3.6.0")
233 (source (origin
234 (method url-fetch)
b38e45d8
EB		 235 (uri (string-append "mirror://gnome/sources/" name "/"
236 (version-major+minor version) "/"
237 name "-" version ".tar.xz"))
c1354b90
LC		 238 (sha256
239 (base32
240 "0c4qrjpmv1hqga3xv6wsq2z10x2n78qgw7q3k3s01y1pggxkgjkd"))))
241 (build-system gnu-build-system)
c1354b90 242 (inputs
c4c4cc05 243 `(("libgcrypt" ,libgcrypt)
c1354b90 244 ("dbus" ,dbus)))
c4c4cc05
JD		 245 (native-inputs
246 `(("pkg-config" ,pkg-config)
426adbe8 247 ("glib" ,glib "bin")
c4c4cc05 248 ("intltool" ,intltool)))
c1354b90
LC		 249 (propagated-inputs
250 ;; Referred to in .h files and .pc.
251 `(("glib" ,glib)))
252 (home-page "http://www.gnome.org")
253 (synopsis "Accessing passwords from the GNOME keyring")
254 (description
255 "Client library to access passwords from the GNOME keyring.")
256
257 ;; Though a couple of files are LGPLv2.1+.
1dd26275 258 (license license:lgpl2.0+)))
c1354b90 259
e99a3d6f
RW		 260(define-public gnome-keyring
261 (package
262 (name "gnome-keyring")
263 (version "3.16.0")
264 (source (origin
265 (method url-fetch)
266 (uri (string-append "mirror://gnome/sources/" name "/"
267 (version-major+minor version) "/"
268 name "-" version ".tar.xz"))
269 (sha256
270 (base32
271 "1xg1xha3x3hzlmvdq2zm90hc61pj7pnf9yxxvgq4ynl5af6bp8qm"))))
272 (build-system gnu-build-system)
273 (arguments
274 `(#:tests? #f ;48 of 603 tests fail because /var/lib/dbus/machine-id does
275 ;not exist
276 #:configure-flags
277 (list
278 (string-append "--with-pkcs11-config="
279 (assoc-ref %outputs "out") "/share/p11-kit/modules/")
280 (string-append "--with-pkcs11-modules="
281 (assoc-ref %outputs "out") "/share/p11-kit/modules/"))
282 #:phases
283 (modify-phases %standard-phases
284 (add-before
285 'check 'pre-check
286 (lambda* (#:key inputs #:allow-other-keys)
287 (substitute* "build/tap-driver"
288 (("/usr/bin/env python") (which "python")))))
289 (add-before
290 'configure 'fix-docbook
291 (lambda* (#:key inputs #:allow-other-keys)
292 (substitute* "docs/Makefile.am"
293 (("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
294 (string-append (assoc-ref inputs "docbook-xsl")
295 "/xml/xsl/docbook-xsl-"
296 ,(package-version docbook-xsl)
297 "/manpages/docbook.xsl")))
298 (setenv "XML_CATALOG_FILES"
299 (string-append (assoc-ref inputs "docbook-xml")
300 "/xml/dtd/docbook/catalog.xml")))))))
301 (inputs
302 `(("libgcrypt" ,libgcrypt)
303 ("dbus" ,dbus)
304 ("gcr" ,gcr)))
305 (native-inputs
306 `(("pkg-config" ,pkg-config)
307 ("glib" ,glib "bin")
308 ("python" ,python-2) ;for tests
309 ("intltool" ,intltool)
310 ("autoconf" ,autoconf)
311 ("automake" ,automake)
312 ("libxslt" ,libxslt) ;for documentation
313 ("docbook-xml" ,docbook-xml-4.2)
314 ("docbook-xsl" ,docbook-xsl)))
315 (home-page "http://www.gnome.org")
316 (synopsis "Daemon to store passwords and encryption keys")
317 (description
318 "gnome-keyring is a program that keeps passwords and other secrets for
319users. It is run as a daemon in the session, similar to ssh-agent, and other
320applications locate it via an environment variable or D-Bus.
321
322The program can manage several keyrings, each with its own master password,
323and there is also a session keyring which is never stored to disk, but
324forgotten when the session ends.")
325 (license license:lgpl2.1+)))
326
c1354b90
LC		 327(define-public evince
328 (package
329 (name "evince")
330 (version "3.6.1")
331 (source (origin
332 (method url-fetch)
b38e45d8
EB		 333 (uri (string-append "mirror://gnome/sources/" name "/"
334 (version-major+minor version) "/"
335 name "-" version ".tar.xz"))
c1354b90
LC		 336 (sha256
337 (base32
338 "1da1pij030dh8mb0pr0jnyszgsbjnh8lc17rj5ii52j3kmbv51qv"))))
121de2e1 339 (build-system glib-or-gtk-build-system)
c1354b90
LC		 340 (arguments
341 `(#:configure-flags '("--disable-nautilus")
342
343 ;; FIXME: Tests fail with:
344 ;; ImportError: No module named gi.repository
345 ;; Where should that module come from?
3d243e9c 346 #:tests? #f))
c1354b90
LC		 347 (inputs
348 `(("libspectre" ,libspectre)
349 ;; ("djvulibre" ,djvulibre)
350 ("ghostscript" ,ghostscript)
351 ("poppler" ,poppler)
352 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
353 ("libgnome-keyring" ,libgnome-keyring)
354 ("gnome-icon-theme" ,gnome-icon-theme)
355 ("itstool" ,itstool)
356 ("gdk-pixbuf" ,gdk-pixbuf)
357 ("atk" ,atk)
358 ("pango" ,pango)
359 ("gtk+" ,gtk+)
360 ("glib" ,glib)
361 ("libxml2" ,libxml2)
c1354b90
LC		 362 ("libsm" ,libsm)
363 ("libice" ,libice)
96e42467 364 ("shared-mime-info" ,shared-mime-info)
3d243e9c
FB		 365 ("dconf" ,dconf)
366 ("libcanberra" ,libcanberra)
2e6ecc5c 367
c1354b90
LC		 368 ;; For tests.
369 ("dogtail" ,python2-dogtail)))
96e42467 370 (native-inputs
c4c4cc05 371 `(("intltool" ,intltool)
426adbe8 372 ("glib" ,glib "bin")
c4c4cc05 373 ("pkg-config" ,pkg-config)))
c1354b90
LC		 374 (home-page
375 "http://www.gnome.org/projects/evince/")
376 (synopsis "GNOME's document viewer")
377 (description
378 "Evince is a document viewer for multiple document formats. It
379currently supports PDF, PostScript, DjVu, TIFF and DVI. The goal
380of Evince is to replace the multiple document viewers that exist
96e42467 381on the GNOME Desktop with a single simple application.")
1dd26275 382 (license license:gpl2+)))
c1354b90 383
22e32e69
AE		 384(define-public gsettings-desktop-schemas
385 (package
386 (name "gsettings-desktop-schemas")
67bdcfbc 387 (version "3.16.0")
22e32e69
AE		 388 (source
389 (origin
390 (method url-fetch)
391 (uri (string-append "mirror://gnome/sources/" name "/"
b38e45d8 392 (version-major+minor version) "/"
22e32e69
AE		 393 name "-" version ".tar.xz"))
394 (sha256
395 (base32
67bdcfbc 396 "02dp1hl38k16m9abydfca1n236mdazqdz0p3n92s7haf9mdqsf16"))))
22e32e69
AE		 397 (build-system gnu-build-system)
398 (inputs
c4c4cc05
JD		 399 `(("glib" ,glib)))
400 (native-inputs
401 `(("intltool" ,intltool)
426adbe8 402 ("glib" ,glib "bin") ; glib-compile-schemas, etc.
7211944a 403 ("gobject-introspection" ,gobject-introspection)
22e32e69
AE		 404 ("pkg-config" ,pkg-config)))
405 (home-page "https://launchpad.net/gsettings-desktop-schemas")
406 (synopsis
407 "GNOME settings for various desktop components")
408 (description
409 "Gsettings-desktop-schemas contains a collection of GSettings schemas
410for settings shared by various components of the GNOME desktop.")
1dd26275 411 (license license:lgpl2.1+)))
22e32e69 412
27477d2d
AE		 413(define-public icon-naming-utils
414 (package
415 (name "icon-naming-utils")
416 (version "0.8.90")
417 (source
418 (origin
419 (method url-fetch)
420 (uri (string-append "http://tango.freedesktop.org/releases/icon-naming-utils-"
421 version ".tar.bz2"))
422 (sha256
423 (base32
424 "1mc3v28fdfqanx3lqx233vcr4glb4c2376k0kx2v91a4vxwqcdxi"))))
425 (build-system gnu-build-system)
426 (inputs
427 `(("perl" ,perl)
428 ("perl-xml-simple" ,perl-xml-simple)))
f4e97277
SB		 429 (arguments
430 '(#:phases
431 (alist-cons-after
432 'install 'set-load-paths
433 ;; Tell 'icon-name-mapping' where XML::Simple is.
434 (lambda* (#:key outputs #:allow-other-keys)
435 (let* ((out (assoc-ref outputs "out"))
436 (prog (string-append out "/libexec/icon-name-mapping")))
437 (wrap-program
438 prog
439 `("PERL5LIB" = ,(list (getenv "PERL5LIB"))))))
440 %standard-phases)))
27477d2d
AE		 441 (home-page "http://tango.freedesktop.org/Standard_Icon_Naming_Specification")
442 (synopsis
443 "Utility to implement the Freedesktop Icon Naming Specification")
444 (description
445 "To help with the transition to the Freedesktop Icon Naming
446Specification, the icon naming utility maps the icon names used by the
447GNOME and KDE desktops to the icon names proposed in the specification.")
1dd26275 448 (license license:lgpl2.1+)))
27477d2d 449
686e025d
SB		 450(define-public desktop-file-utils
451 (package
452 (name "desktop-file-utils")
453 (version "0.22")
454 (source (origin
455 (method url-fetch)
456 (uri (string-append "http://www.freedesktop.org/software/" name
457 "/releases/" name "-" version ".tar.xz"))
458 (sha256
459 (base32
460 "1ianvr2a69yjv4rpyv30w7yjsmnsb23crrka5ndqxycj4rkk4dc4"))))
461 (build-system gnu-build-system)
462 (native-inputs
463 `(("pkg-config" ,pkg-config)))
464 (inputs
465 `(("glib" ,glib)))
466 (home-page "http://www.freedesktop.org/wiki/Software/desktop-file-utils/")
467 (synopsis "Utilities for working with desktop entries")
468 (description
469 "This package contains a few command line utilities for working with
470desktop entries:
471
472desktop-file-validate: validates a desktop file and prints warnings/errors
473 about desktop entry specification violations.
474
475desktop-file-install: installs a desktop file to the applications directory,
476 optionally munging it a bit in transit.
477
478update-desktop-database: updates the database containing a cache of MIME types
479 handled by desktop files.")
480 (license license:gpl2+)))
481
7d3f3651
AE		 482(define-public gnome-icon-theme
483 (package
484 (name "gnome-icon-theme")
b32f58dd 485 (version "3.12.0")
7d3f3651
AE		 486 (source
487 (origin
488 (method url-fetch)
489 (uri (string-append "mirror://gnome/sources/" name "/"
b38e45d8 490 (version-major+minor version) "/"
7d3f3651
AE		 491 name "-" version ".tar.xz"))
492 (sha256
493 (base32
b32f58dd 494 "0fjh9qmmgj34zlgxb09231ld7khys562qxbpsjlaplq2j85p57im"))))
7d3f3651 495 (build-system gnu-build-system)
c4c4cc05 496 (native-inputs
73b6cf42
SB		 497 `(("gtk+" ,gtk+) ; for gtk-update-icon-cache
498 ("icon-naming-utils" ,icon-naming-utils)
499 ("intltool" ,intltool)
500 ("pkg-config" ,pkg-config)))
7d3f3651
AE		 501 (home-page "http://art.gnome.org/")
502 (synopsis
503 "GNOME icon theme")
504 (description
505 "Icons for the GNOME desktop.")
1dd26275 506 (license license:lgpl3))) ; or Creative Commons BY-SA 3.0
7d3f3651 507
9167f8e6
LC		 508(define-public shared-mime-info
509 (package
510 (name "shared-mime-info")
511 (version "1.2")
512 (source (origin
513 (method url-fetch)
b38e45d8
EB		 514 (uri (string-append "http://freedesktop.org/~hadess/"
515 "shared-mime-info-" version ".tar.xz"))
9167f8e6
LC		 516 (sha256
517 (base32
518 "0y5vi0vr6rbhvfzcfg57cfskn362bpvcpca9cy598nmr87i6lld5"))))
519 (build-system gnu-build-system)
520 (arguments
521 ;; The build system appears not to be parallel-safe.
522 '(#:parallel-build? #f))
523 (inputs
524 `(("glib" ,glib)
c4c4cc05 525 ("libxml2" ,libxml2)))
9167f8e6 526 (native-inputs
c4c4cc05
JD		 527 `(("intltool" ,intltool)
528 ("pkg-config" ,pkg-config)))
9167f8e6
LC		 529 (home-page "http://freedesktop.org/wiki/Software/shared-mime-info")
530 (synopsis "Database of common MIME types")
531 (description
532 "The shared-mime-info package contains the core database of common types
533and the update-mime-database command used to extend it. It requires glib2 to
534be installed for building the update command. Additionally, it uses intltool
535for translations, though this is only a dependency for the maintainers. This
536database is translated at Transifex.")
1dd26275 537 (license license:gpl2+)))
9167f8e6 538
bef4dd92
AE		 539(define-public hicolor-icon-theme
540 (package
541 (name "hicolor-icon-theme")
542 (version "0.12")
543 (source
544 (origin
545 (method url-fetch)
b38e45d8
EB		 546 (uri (string-append "http://icon-theme.freedesktop.org/releases/"
547 "hicolor-icon-theme-" version ".tar.gz"))
bef4dd92
AE		 548 (sha256
549 (base32
550 "0wzc7g4ldb2l8zc0x2785ck808c03i857jji942ikakyc68adp4y"))))
551 (build-system gnu-build-system)
552 (arguments
553 `(#:tests? #f)) ; no check target
554 (home-page "http://icon-theme.freedesktop.org/releases/")
555 (synopsis
556 "Freedesktop icon theme")
557 (description
558 "Freedesktop icon theme.")
1dd26275 559 (license license:gpl2)))
bef4dd92 560
d9c1a22b
AE		 561(define-public libnotify
562 (package
563 (name "libnotify")
564 (version "0.7.6")
565 (source
566 (origin
567 (method url-fetch)
568 (uri (string-append "mirror://gnome/sources/" name "/"
b38e45d8 569 (version-major+minor version) "/"
d9c1a22b
AE		 570 name "-" version ".tar.xz"))
571 (sha256
572 (base32
573 "0dyq8zgjnnzcah31axnx6afb21kl7bks1gvrg4hjh3nk02j1rxhf"))))
574 (build-system gnu-build-system)
575 (inputs
576 `(("gdk-pixbuf" ,gdk-pixbuf)
577 ("glib" ,glib)
578 ("gtk+" ,gtk+)
c4c4cc05
JD		 579 ("libpng" ,libpng)))
580 (native-inputs
426adbe8
LC		 581 `(("pkg-config" ,pkg-config)
582 ("glib" ,glib "bin")))
d9c1a22b
AE		 583 (home-page "https://developer-next.gnome.org/libnotify/")
584 (synopsis
585 "GNOME desktop notification library")
586 (description
587 "Libnotify is a library that sends desktop notifications to a
35b9e423 588notification daemon, as defined in the Desktop Notifications spec. These
d9c1a22b
AE		 589notifications can be used to inform the user about an event or display
590some form of information without getting in the user's way.")
1dd26275 591 (license license:lgpl2.1+)))
7a8605ce
CR		 592
593(define-public libpeas
594 (package
595 (name "libpeas")
58d32305 596 (version "1.12.1")
7a8605ce
CR		 597 (source
598 (origin
599 (method url-fetch)
600 (uri (string-append "mirror://gnome/sources/" name "/"
b38e45d8 601 (version-major+minor version) "/"
7a8605ce
CR		 602 name "-" version ".tar.xz"))
603 (sha256
604 (base32
58d32305 605 "1mjjjjwphc83bjznmbsm7x0jg7ql261nys6qnl7mi0nkr4qvw476"))))
7a8605ce 606 (build-system gnu-build-system)
7a8605ce
CR		 607 (inputs
608 `(("atk" ,atk)
609 ("gdk-pixbuf" ,gdk-pixbuf)
610 ("glib" ,glib)
7a8605ce 611 ("gtk+" ,gtk+)
141aed80
LC		 612 ("pango" ,pango)))
613 (native-inputs
614 `(("pkg-config" ,pkg-config)
93622993 615 ("glib:bin" ,glib "bin")
141aed80
LC		 616 ("gobject-introspection" ,gobject-introspection)
617 ("intltool" ,intltool)))
7a8605ce
CR		 618 (home-page "https://wiki.gnome.org/Libpeas")
619 (synopsis "GObject plugin system")
620 (description
35b9e423 621 "Libpeas is a gobject-based plugins engine, and is targetted at giving
7a8605ce
CR		 622every application the chance to assume its own extensibility. It also has a
623set of features including, but not limited to: multiple extension points; on
624demand (lazy) programming language support for C, Python and JS; simplicity of
625the API")
1dd26275 626 (license license:lgpl2.0+)))
ed19903d
JD		 627
628(define-public gtkglext
629 (package
630 (name "gtkglext")
631 (version "1.2.0")
632 (source (origin
633 (method url-fetch)
634 (uri (string-append "mirror://sourceforge/project/gtkglext/gtkglext/"
635 version "/gtkglext-" version ".tar.gz"))
636 (sha256
637 (base32 "1ya4d2j2aacr9ii5zj4ac95fjpdvlm2rg79mgnk7yvl1dcy3y1z5"))
638 (patches (list
ed19903d
JD		 639 (search-patch "gtkglext-disable-disable-deprecated.patch")))))
640 (build-system gnu-build-system)
641 (inputs `(("gtk+" ,gtk+-2)
642 ("mesa" ,mesa)
cc8b02f4 643 ("glu" ,glu)
ed19903d
JD		 644 ("libx11" ,libx11)
645 ("libxt" ,libxt)))
426adbe8
LC		 646 (native-inputs `(("pkg-config" ,pkg-config)
647 ("glib" ,glib "bin")))
a83b6a06 648 (propagated-inputs `(("pangox-compat" ,pangox-compat)))
ed19903d 649 (home-page "https://projects.gnome.org/gtkglext")
9e771e3b 650 (synopsis "OpenGL extension to GTK+")
35b9e423 651 (description "GtkGLExt is an OpenGL extension to GTK+. It provides
ed19903d
JD		 652additional GDK objects which support OpenGL rendering in GTK+ and GtkWidget
653API add-ons to make GTK+ widgets OpenGL-capable.")
1dd26275 654 (license license:lgpl2.1+)))
3600420e
JD		 655
656(define-public glade3
657 (package
658 (name "glade")
659 (version "3.8.4")
b38e45d8
EB		 660 (source (origin
661 (method url-fetch)
662 (uri (string-append "mirror://gnome/sources/" name "/"
663 (version-major+minor version) "/"
664 name "3-" version ".tar.xz"))
3600420e
JD		 665 (sha256
666 (base32 "021xgq2l18w3rvwms9aq2idm0fk66vwb4f777gs0qh3ap5shgbn7"))))
667 (build-system gnu-build-system)
668 (inputs
669 `(("gtk+" ,gtk+-2)
670 ("libxml2" ,libxml2)))
671 (native-inputs
672 `(("intltool" ,intltool)
673 ("python" ,python)
674 ("pkg-config" ,pkg-config)))
675 (home-page "https://glade.gnome.org")
676 (synopsis "GTK+ rapid application development tool")
677 (description "Glade is a rapid application development (RAD) tool to
678enable quick & easy development of user interfaces for the GTK+ toolkit and
679the GNOME desktop environment.")
1dd26275
LC		 680 (license license:lgpl2.0+)))
681
682(define-public libcroco
683 (package
684 (name "libcroco")
685 (version "0.6.8")
686 (source (origin
687 (method url-fetch)
b38e45d8
EB		 688 (uri (string-append "mirror://gnome/sources/" name "/"
689 (version-major+minor version) "/"
690 name "-" version ".tar.xz"))
1dd26275
LC		 691 (sha256
692 (base32
693 "0w453f3nnkbkrly7spx5lx5pf6mwynzmd5qhszprq8amij2invpa"))))
694 (build-system gnu-build-system)
695 (native-inputs
696 `(("pkg-config" ,pkg-config)))
697 (inputs
698 `(("glib" ,glib)
699 ("libxml2" ,libxml2)
700 ("zlib" ,zlib)))
701 (home-page "https://github.com/GNOME/libcroco")
702 (synopsis "CSS2 parsing and manipulation library")
703 (description
704 "Libcroco is a standalone CSS2 parsing and manipulation library.
705The parser provides a low level event driven SAC-like API and a CSS object
706model like API. Libcroco provides a CSS2 selection engine and an experimental
707XML/CSS rendering engine.")
708
709 ;; LGPLv2.1-only.
710 (license license:lgpl2.1)))
25178594
LC		 711
712(define-public libgsf
713 (package
714 (name "libgsf")
715 (version "1.14.30")
716 (source (origin
717 (method url-fetch)
b38e45d8
EB		 718 (uri (string-append "mirror://gnome/sources/" name "/"
719 (version-major+minor version) "/"
720 name "-" version ".tar.xz"))
25178594
LC		 721 (sha256
722 (base32
723 "0w2v1a9sxsymd1mcy4mwsz4r6za9iwq69rj86nb939p41d4c6j6b"))))
724 (build-system gnu-build-system)
725 (native-inputs
726 `(("intltool" ,intltool)
727 ("pkg-config" ,pkg-config)))
728 (inputs
729 `(("python" ,python)
730 ("zlib" ,zlib)
731 ("bzip2" ,bzip2)))
732 (propagated-inputs
733 `(("gdk-pixbuf" ,gdk-pixbuf)
734 ("glib" ,glib)
735 ("libxml2" ,libxml2)))
736 (home-page "http://www.gnome.org/projects/libgsf")
737 (synopsis "GNOME's Structured File Library")
738 (description
739 "Libgsf aims to provide an efficient extensible I/O abstraction for
740dealing with different structured file formats.")
741
742 ;; LGPLv2.1-only.
743 (license license:lgpl2.1)))
63016e7c
LC		 744
745(define-public librsvg
746 (package
747 (name "librsvg")
dc67ebd2 748 (version "2.40.6")
63016e7c
LC		 749 (source (origin
750 (method url-fetch)
b38e45d8
EB		 751 (uri (string-append "mirror://gnome/sources/" name "/"
752 (version-major+minor version) "/"
753 name "-" version ".tar.xz"))
63016e7c
LC		 754 (sha256
755 (base32
dc67ebd2 756 "01jgb11779080b80k2ncrhdphgillqrrnszal6vh8yv787r4kwwa"))))
63016e7c
LC		 757 (build-system gnu-build-system)
758 (arguments
ce2df078 759 `(#:phases
63016e7c
LC		 760 (alist-cons-before
761 'configure 'augment-gir-search-path
762 (lambda* (#:key inputs #:allow-other-keys)
63016e7c
LC		 763 (substitute* "gdk-pixbuf-loader/Makefile.in"
764 ;; By default the gdk-pixbuf loader is installed under
765 ;; gdk-pixbuf's prefix. Work around that.
766 (("gdk_pixbuf_moduledir = .*$")
767 (string-append "gdk_pixbuf_moduledir = "
dc67ebd2 768 "$(prefix)/lib/gdk-pixbuf-2.0/2.10.0/"
63016e7c
LC		 769 "loaders\n"))
770 ;; Likewise, create a separate 'loaders.cache' file.
771 (("gdk_pixbuf_cache_file = .*$")
772 "gdk_pixbuf_cache_file = $(gdk_pixbuf_moduledir).cache\n")))
cd14b5e3
FB		 773 (alist-cons-after
774 'install 'generate-full-cache
775 (lambda* (#:key inputs outputs #:allow-other-keys)
2e6ecc5c 776 (let ((loaders-directory
cd14b5e3 777 (string-append (assoc-ref outputs "out")
dc67ebd2 778 "/lib/gdk-pixbuf-2.0/2.10.0/loaders")))
cd14b5e3 779 (zero?
2e6ecc5c
AE		 780 (system
781 (string-append
782 "gdk-pixbuf-query-loaders "
cd14b5e3 783 loaders-directory "/libpixbufloader-svg.so "
2e6ecc5c 784 (string-join (find-files (assoc-ref inputs "gdk-pixbuf")
cd14b5e3
FB		 785 "libpixbufloader-.*\\.so") " ")
786 "> " loaders-directory ".cache")))))
b19d6805 787 %standard-phases))))
63016e7c
LC		 788 (native-inputs
789 `(("pkg-config" ,pkg-config)
44add1ce 790 ("glib" ,glib "bin") ; glib-mkenums, etc.
63016e7c
LC		 791 ("gobject-introspection" ,gobject-introspection))) ; g-ir-compiler, etc.
792 (inputs
793 `(("pango" ,pango)
794 ("libcroco" ,libcroco)
795 ("bzip2" ,bzip2)
796 ("libgsf" ,libgsf)
797 ("libxml2" ,libxml2)))
798 (propagated-inputs
799 ;; librsvg-2.0.pc refers to all of that.
800 `(("cairo" ,cairo)
801 ("gdk-pixbuf" ,gdk-pixbuf)
802 ("glib" ,glib)))
803 (home-page "https://wiki.gnome.org/LibRsvg")
804 (synopsis "Render SVG files using Cairo")
805 (description
35b9e423 806 "Librsvg is a C library to render SVG files using the Cairo 2D graphics
63016e7c
LC		 807library.")
808 (license license:lgpl2.0+)))
5698b8b8
JD		 809
810(define-public libidl
811 (package
812 (name "libidl")
813 (version "0.8.14")
814 (source (origin
815 (method url-fetch)
816 (uri (let ((upstream-name "libIDL"))
b38e45d8
EB		 817 (string-append "mirror://gnome/sources/" upstream-name "/"
818 (version-major+minor version) "/"
819 upstream-name "-" version ".tar.bz2")))
5698b8b8
JD		 820 (sha256
821 (base32
822 "08129my8s9fbrk0vqvnmx6ph4nid744g5vbwphzkaik51664vln5"))))
823 (build-system gnu-build-system)
824 (inputs `(("glib" ,glib)))
825 (native-inputs
826 `(("pkg-config" ,pkg-config)
827 ("flex", flex)
828 ("bison" ,bison)))
829 (home-page "http://freecode.com/projects/libidl")
830 (synopsis "Create trees of CORBA Interface Definition Language files")
35b9e423 831 (description "Libidl is a library for creating trees of CORBA Interface
5698b8b8
JD		 832Definition Language (idl) files, which is a specification for defining
833portable interfaces. libidl was initially written for orbit (the orb from the
35b9e423 834GNOME project, and the primary means of libidl distribution). However, the
2e6ecc5c 835functionality was designed to be as reusable and portable as possible.")
5698b8b8
JD		 836 (license license:lgpl2.0+)))
837
838
839(define-public orbit2
840 (package
841 (name "orbit2")
842 (version "2.14.19")
843 (source (origin
844 (method url-fetch)
2e6ecc5c 845 (uri (let ((upstream-name "ORBit2"))
b38e45d8
EB		 846 (string-append "mirror://gnome/sources/" upstream-name "/"
847 (version-major+minor version) "/"
848 upstream-name "-" version ".tar.bz2")))
5698b8b8
JD		 849 (sha256
850 (base32 "0l3mhpyym9m5iz09fz0rgiqxl2ym6kpkwpsp1xrr4aa80nlh1jam"))))
851 (build-system gnu-build-system)
852 (arguments
853 ;; The programmer kindly gives us a hook to turn off deprecation warnings ...
854 `(#:configure-flags '("DISABLE_DEPRECATED_CFLAGS=-DGLIB_DISABLE_DEPRECATION_WARNINGS")
855 ;; ... which they then completly ignore !!
856 #:phases
857 (alist-cons-before
858 'configure 'ignore-deprecations
859 (lambda _
860 (substitute* "linc2/src/Makefile.in"
861 (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS")))
862 %standard-phases)))
863 (inputs `(("glib" ,glib)
864 ("libidl" ,libidl)))
865 (native-inputs
866 `(("pkg-config" ,pkg-config)))
867 (home-page "https://projects.gnome.org/orbit2/")
868 (synopsis "CORBA 2.4-compliant Object Request Broker")
35b9e423 869 (description "ORBit2 is a CORBA 2.4-compliant Object Request Broker (orb)
2e6ecc5c 870featuring mature C, C++ and Python bindings.")
5698b8b8
JD		 871 ;; Licence notice is unclear. The Web page simply say "GPL" without giving a version.
872 ;; SOME of the code files have licence notices for GPLv2+
873 ;; The tarball contains files of the text of GPLv2 and LGPLv2
2e6ecc5c 874 (license license:gpl2+)))
5698b8b8
JD		 875
876
877(define-public libbonobo
878 (package
879 (name "libbonobo")
880 (version "2.32.1")
881 (source (origin
882 (method url-fetch)
5becd025 883 (uri (string-append "mirror://gnome/sources/" name "/"
29a7c98a 884 (version-major+minor version)
5becd025 885 "/" name "-" version ".tar.bz2"))
5698b8b8 886 (sha256
f1fc45a9
EB		 887 (base32 "0swp4kk6x7hy1rvd1f9jba31lvfc6qvafkvbpg9h0r34fzrd8q4i"))
888 (patches (list (search-patch "libbonobo-activation-test-race.patch")))))
5698b8b8
JD		 889 (build-system gnu-build-system)
890 (arguments
891 ;; The programmer kindly gives us a hook to turn off deprecation warnings ...
5becd025
EB		 892 `(#:configure-flags
893 '("DISABLE_DEPRECATED_CFLAGS=-DGLIB_DISABLE_DEPRECATION_WARNINGS")
894 ;; ... which they then completly ignore !!
895 #:phases
896 (alist-cons-before
897 'configure 'ignore-deprecations
898 (lambda _
899 (substitute* "activation-server/Makefile.in"
900 (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS")))
901 %standard-phases)))
5698b8b8
JD		 902 (inputs `(("popt" ,popt)
903 ("libxml2" ,libxml2)))
904 ;; The following are Required by the .pc file
44add1ce 905 (propagated-inputs
5698b8b8
JD		 906 `(("glib" ,glib)
907 ("orbit2" ,orbit2)))
908 (native-inputs
909 `(("intltool" ,intltool)
910 ("pkg-config" ,pkg-config)
221ed17a 911 ("glib" ,glib "bin") ; for glib-genmarshal, etc.
5698b8b8
JD		 912 ("flex" ,flex)
913 ("bison" ,bison)))
914 (home-page "https://developer.gnome.org/libbonobo/")
915 (synopsis "Framework for creating reusable components for use in GNOME applications")
916 (description "Bonobo is a framework for creating reusable components for
2e6ecc5c 917use in GNOME applications, built on top of CORBA.")
5698b8b8
JD		 918 ;; Licence not explicitly stated. Source files contain no licence notices.
919 ;; Tarball contains text of both GPLv2 and LGPLv2
920 ;; GPLv2 covers both conditions
921 (license license:gpl2+)))
922
923
924(define-public gconf
925 (package
926 (name "gconf")
927 (version "3.2.6")
928 (source (origin
929 (method url-fetch)
2e6ecc5c 930 (uri
5698b8b8 931 (let ((upstream-name "GConf"))
b38e45d8
EB		 932 (string-append "mirror://gnome/sources/" upstream-name "/"
933 (version-major+minor version) "/"
934 upstream-name "-" version ".tar.xz")))
5698b8b8
JD		 935 (sha256
936 (base32 "0k3q9nh53yhc9qxf1zaicz4sk8p3kzq4ndjdsgpaa2db0ccbj4hr"))))
937 (build-system gnu-build-system)
2e88d113 938 (inputs `(("dbus-glib" ,dbus-glib)
5698b8b8 939 ("libxml2" ,libxml2)))
2e6ecc5c
AE		 940 (propagated-inputs `(("glib" ,glib) ; referred to in the .pc file
941 ("orbit2" ,orbit2)))
5698b8b8
JD		 942 (native-inputs
943 `(("intltool" ,intltool)
221ed17a 944 ("glib" ,glib "bin") ; for glib-genmarshal, etc.
5698b8b8
JD		 945 ("pkg-config" ,pkg-config)))
946 (home-page "https://projects.gnome.org/gconf/")
35b9e423
EB		 947 (synopsis "Store application preferences")
948 (description "Gconf is a system for storing application preferences. It
949is intended for user preferences; not arbitrary data storage.")
2e6ecc5c 950 (license license:lgpl2.0+)))
5698b8b8
JD		 951
952
953(define-public gnome-mime-data
954 (package
955 (name "gnome-mime-data")
956 (version "2.18.0")
957 (source (origin
958 (method url-fetch)
b38e45d8
EB		 959 (uri (string-append "mirror://gnome/sources/" name "/"
960 (version-major+minor version) "/"
961 name "-" version ".tar.bz2"))
5698b8b8
JD		 962 (sha256
963 (base32
964 "1mvg8glb2a40yilmyabmb7fkbzlqd3i3d31kbkabqnq86xdnn69p"))))
965 (build-system gnu-build-system)
966 (native-inputs
967 `(("perl" ,perl)
968 ("intltool" ,intltool)))
969 (home-page "http://www.gnome.org")
35b9e423 970 (synopsis "Base MIME and Application database for GNOME")
5698b8b8
JD		 971 (description "GNOME Mime Data is a module which contains the base MIME
972and Application database for GNOME. The data stored by this module is
973designed to be accessed through the MIME functions in GnomeVFS.")
974 (license license:gpl2+)))
975
976
977(define-public gnome-vfs
978 (package
979 (name "gnome-vfs")
980 (version "2.24.4")
981 (source (origin
982 (method url-fetch)
b38e45d8
EB		 983 (uri (string-append "mirror://gnome/sources/" name "/"
984 (version-major+minor version) "/"
985 name "-" version ".tar.bz2"))
5698b8b8 986 (sha256
9e12bc34
MW		 987 (base32
988 "1ajg8jb8k3snxc7rrgczlh8daxkjidmcv3zr9w809sq4p2sn9pk2"))))
5698b8b8
JD		 989 (build-system gnu-build-system)
990 (arguments
db5127d8 991 `(#:phases
9e12bc34
MW		 992 (alist-cons-before
993 'configure 'ignore-deprecations
994 (lambda _
995 (substitute* '("libgnomevfs/Makefile.in"
996 "daemon/Makefile.in")
997 (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS"))
998 #t)
db5127d8
MW		 999 (alist-cons-before
1000 'configure 'patch-test-async-cancel-to-never-fail
1001 (lambda _
1002 (substitute* "test/test-async-cancel.c"
1003 (("EXIT_FAILURE") "77")))
1004 %standard-phases))))
2e6ecc5c 1005 (inputs `(("libxml2" ,libxml2)
5698b8b8 1006 ("dbus-glib" ,dbus-glib)
5698b8b8
JD		 1007 ("gconf" ,gconf)
1008 ("gnome-mime-data" ,gnome-mime-data)
1009 ("zlib" ,zlib)))
1010 (native-inputs
221ed17a
EB		 1011 `(("glib" ,glib "bin") ; for glib-mkenums, etc.
1012 ("intltool" ,intltool)
5698b8b8
JD		 1013 ("pkg-config" ,pkg-config)))
1014 (home-page "https://developer.gnome.org/gnome-vfs/")
35b9e423 1015 (synopsis "Access files and folders in GNOME applications")
9e12bc34
MW		 1016 (description
1017 "GnomeVFS is the core library used to access files and folders in GNOME
1018applications. It provides a file system abstraction which allows applications
1019to access local and remote files with a single consistent API.")
5698b8b8
JD		 1020 (license license:lgpl2.0+)))
1021
1022
1023
1024(define-public libgnome
1025 (package
1026 (name "libgnome")
1027 (version "2.32.1")
1028 (source (origin
1029 (method url-fetch)
b38e45d8
EB		 1030 (uri (string-append "mirror://gnome/sources/" name "/"
1031 (version-major+minor version) "/"
1032 name "-" version ".tar.bz2"))
5698b8b8
JD		 1033 (sha256
1034 (base32
1035 "197pnq8y0knqjhm2fg4j6hbqqm3qfzfnd0irhwxpk1b4hqb3kimj"))))
1036 (build-system gnu-build-system)
1037 (arguments
1038 `(#:phases
1039 (alist-cons-before
1040 'configure 'enable-deprecated
2e6ecc5c 1041 (lambda _
5698b8b8
JD		 1042 (substitute* "libgnome/Makefile.in"
1043 (("-DG_DISABLE_DEPRECATED") "-DGLIB_DISABLE_DEPRECATION_WARNINGS")))
1044 %standard-phases)))
1045 (inputs `(("popt" ,popt)
1046 ("libxml2" ,libxml2)))
1047 (native-inputs
221ed17a
EB		 1048 `(("glib" ,glib "bin") ; for glib-mkenums, etc.
1049 ("intltool" ,intltool)
5698b8b8
JD		 1050 ("pkg-config" ,pkg-config)))
1051 ;; The following are listed as Required in the .pc file
1052 ;; (except for libcanberra -- which seems to be oversight on the part
1053 ;; of the upstream developers -- anything that links against libgnome,
1054 ;; must also link against libcanberra
1055 (propagated-inputs
1056 `(("libcanberra" ,libcanberra)
1057 ("libbonobo" ,libbonobo)
1058 ("gconf" ,gconf)
2e6ecc5c 1059 ("gnome-vfs" ,gnome-vfs)))
5698b8b8
JD		 1060 (home-page "https://developer.gnome.org/libgnome/")
1061 (synopsis "Useful routines for building applications")
1062 (description "The libgnome library provides a number of useful routines
1063for building modern applications, including session management, activation of
1064files and URIs, and displaying help.")
1065 (license license:lgpl2.0+)))
1066
1067
1068(define-public libart-lgpl
1069 (package
1070 (name "libart-lgpl")
76c9b6aa 1071 (version "2.3.21")
5698b8b8
JD		 1072 (source (origin
1073 (method url-fetch)
1074 (uri (let ((upstream-name "libart_lgpl"))
b38e45d8
EB		 1075 (string-append "mirror://gnome/sources/" upstream-name "/"
1076 (version-major+minor version) "/"
1077 upstream-name "-" version ".tar.bz2")))
5698b8b8
JD		 1078 (sha256
1079 (base32
76c9b6aa 1080 "1yknfkyzgz9s616is0l9gp5aray0f2ry4dw533jgzj8gq5s1xhgx"))))
5698b8b8
JD		 1081 (build-system gnu-build-system)
1082 (native-inputs
1083 `(("pkg-config" ,pkg-config)))
1084 (home-page "https://people.gnome.org/~mathieu/libart")
1085 (synopsis "2D drawing library")
2e6ecc5c 1086 (description "Libart is a 2D drawing library intended as a
5698b8b8
JD		 1087high-quality vector-based 2D library with antialiasing and alpha composition.")
1088 (license license:lgpl2.0+)))
1089
1090
1091
1092(define-public libgnomecanvas
1093 (package
1094 (name "libgnomecanvas")
1095 (version "2.30.3")
1096 (source (origin
1097 (method url-fetch)
b38e45d8
EB		 1098 (uri (string-append "mirror://gnome/sources/" name "/"
1099 (version-major+minor version) "/"
1100 name "-" version ".tar.gz"))
5698b8b8
JD		 1101 (sha256
1102 (base32
1103 "1nhnq4lfkk8ljkdafscwaggx0h95mq0rxnd7zgqyq0xb6kkqbjm8"))))
1104 (build-system gnu-build-system)
1105 ;; Mentioned as Required in the .pc file
1106 (propagated-inputs `(("libart-lgpl" ,libart-lgpl)
1107 ("gtk+" ,gtk+-2)))
1108 (native-inputs
1109 `(("intltool" ,intltool)
221ed17a 1110 ("glib" ,glib "bin") ; for glib-genmarshal, etc.
5698b8b8
JD		 1111 ("pkg-config" ,pkg-config)))
1112 (home-page "https://developer.gnome.org/libgnomecanvas/")
1113 (synopsis "Flexible widget for creating interactive structured graphics")
1114 (description "The GnomeCanvas widget provides a flexible widget for
1115creating interactive structured graphics.")
1116 (license license:lgpl2.0+)))
1117
eadc734e
RW		 1118(define-public libgnomecanvasmm
1119 (package
1120 (name "libgnomecanvasmm")
1121 (version "2.26.0")
1122 (source (origin
1123 (method url-fetch)
1124 (uri (string-append "mirror://gnome/sources/" name "/"
1125 (version-major+minor version) "/"
1126 name "-" version ".tar.bz2"))
1127 (sha256
1128 (base32
1129 "0679hcnpam2gkag2i63sm0wdm35gwvzafnz1354mg6j5gzwpfrcr"))))
1130 (build-system gnu-build-system)
1131 (propagated-inputs `(("libgnomecanvas" ,libgnomecanvas)))
1132 (native-inputs
1133 `(("gtkmm-2" ,gtkmm-2)
1134 ("pkg-config" ,pkg-config)))
1135 (home-page "http://gtkmm.org")
1136 (synopsis "C++ bindings to the GNOME Canvas library")
1137 (description "C++ bindings to the GNOME Canvas library.")
1138 (license license:lgpl2.0+)))
1139
5698b8b8
JD		 1140(define-public libgnomeui
1141 (package
1142 (name "libgnomeui")
1143 (version "2.24.5")
1144 (source (origin
1145 (method url-fetch)
b38e45d8
EB		 1146 (uri (string-append "mirror://gnome/sources/" name "/"
1147 (version-major+minor version) "/"
1148 name "-" version ".tar.bz2"))
5698b8b8
JD		 1149 (sha256
1150 (base32
1151 "03rwbli76crkjl6gp422wrc9lqpl174k56cp9i96b7l8jlj2yddf"))))
1152 (build-system gnu-build-system)
1153 ;; Mentioned as Required in the .pc file
1154 (propagated-inputs `(("libgnome" ,libgnome)
1155 ("libgnome-keyring" ,libgnome-keyring)))
1156 (inputs `(("libgnomecanvas" ,libgnomecanvas)
1157 ("libbonoboui" ,libbonoboui)
1158 ("libjpeg" ,libjpeg)
1159 ("popt" ,popt)
1160 ("libbonobo" ,libbonobo)
1161 ("libxml2" ,libxml2)
1162 ("libglade" ,libglade)))
1163 (native-inputs
221ed17a
EB		 1164 `(("glib" ,glib "bin") ; for glib-mkenums, etc.
1165 ("intltool" ,intltool)
5698b8b8
JD		 1166 ("pkg-config" ,pkg-config)))
1167 (home-page "https://developer.gnome.org/libgnomeui/")
1168 (synopsis "Additional widgets for applications")
35b9e423
EB		 1169 (description "The libgnomeui library provides additional widgets for
1170applications. Many of the widgets from libgnomeui have already been ported to GTK+.")
5698b8b8
JD		 1171 (license license:lgpl2.0+)))
1172
1173(define-public libglade
1174 (package
1175 (name "libglade")
1176 (version "2.6.4")
1177 (source (origin
1178 (method url-fetch)
b38e45d8
EB		 1179 (uri (string-append "mirror://gnome/sources/" name "/"
1180 (version-major+minor version) "/"
1181 name "-" version ".tar.bz2"))
5698b8b8
JD		 1182 (sha256
1183 (base32
1184 "1v2x2s04jry4gpabws92i0wq2ghd47yr5n9nhgnkd7c38xv1wdk4"))))
1185 (build-system gnu-build-system)
1186 (inputs
1187 `(("gtk+-2" ,gtk+-2)
1188 ("libxml2" ,libxml2)
1189 ("python" ,python))) ;; needed for the optional libglade-convert program
1190 (native-inputs
1191 `(("pkg-config" ,pkg-config)))
1192 (home-page "https://developer.gnome.org/libglade")
35b9e423
EB		 1193 (synopsis "Load glade interfaces and access the glade built widgets")
1194 (description "Libglade is a library that provides interfaces for loading
5698b8b8
JD		 1195graphical interfaces described in glade files and for accessing the
1196widgets built in the loading process.")
1197 (license license:gpl2+))) ; This is correct. GPL not LGPL
1198
1199(define-public libgnomeprint
eb497b66
LC		 1200 ;; This library has been deprecated since 2006; see
1201 ;; <https://mail.gnome.org/archives/devel-announce-list/2006-August/msg00005.html>.
5698b8b8
JD		 1202 (package
1203 (name "libgnomeprint")
1204 (version "2.8.2")
1205 (source (origin
1206 (method url-fetch)
b38e45d8
EB		 1207 (uri (string-append "mirror://gnome/sources/" name "/"
1208 (version-major+minor version) "/"
1209 name "-" version ".tar.bz2"))
5698b8b8
JD		 1210 (sha256
1211 (base32
3edce2c9
RW		 1212 "129ka3nn8gx9dlfry17ib79azxk45wzfv5rgqzw6dwx2b5ns8phm"))
1213 (modules '((guix build utils)))
1214 (snippet
1215 ;; Adapt to newer freetype. As the package is deprecated, there
1216 ;; is no use in creating a patch and reporting it.
1217 '(substitute* '("libgnomeprint/gnome-font-face.c"
1218 "libgnomeprint/gnome-rfont.c")
1219 (("freetype/") "freetype2/")))))
5698b8b8
JD		 1220 (build-system gnu-build-system)
1221 (inputs
1222 `(("popt" ,popt)
1223 ("libart-lgpl" ,libart-lgpl)
1224 ("gtk+" ,gtk+-2)
44add1ce 1225 ("libxml2" ,libxml2)))
5698b8b8
JD		 1226 (native-inputs
1227 `(("intltool" ,intltool)
221ed17a 1228 ("glib" ,glib "bin") ; for glib-genmarshal, etc.
5698b8b8
JD		 1229 ("pkg-config" ,pkg-config)))
1230 (home-page "https://projects.gnome.org/gnome-print/home/faq.html")
35b9e423 1231 (synopsis "Printing framework for GNOME")
eb497b66
LC		 1232 (description
1233 "GNOME-print was a printing framework for GNOME. It has been deprecated
1234since ca. 2006, when GTK+ itself incorporated printing support.")
5698b8b8
JD		 1235 (license license:lgpl2.0+)))
1236
1237
1238(define-public libgnomeprintui
eb497b66 1239 ;; Deprecated; see libgnomeprint.
5698b8b8
JD		 1240 (package
1241 (name "libgnomeprintui")
1242 (version "2.8.2")
1243 (source (origin
1244 (method url-fetch)
b38e45d8
EB		 1245 (uri (string-append "mirror://gnome/sources/" name "/"
1246 (version-major+minor version) "/"
1247 name "-" version ".tar.bz2"))
5698b8b8
JD		 1248 (sha256
1249 (base32
1250 "1ivipk7r61rg90p9kp889j28xlyyj6466ypvwa4jvnrcllnaajsw"))))
1251 (build-system gnu-build-system)
1252 ;; Mentioned as Required in the .pc file
1253 (propagated-inputs `(("libgnomeprint" ,libgnomeprint)))
1254 (inputs `(("gtk+" ,gtk+-2)
1255 ("glib" ,glib)
1256 ("gnome-icon-theme" ,gnome-icon-theme)
1257 ("libgnomecanvas" ,libgnomecanvas)
2e6ecc5c 1258 ("libxml2" ,libxml2)))
5698b8b8
JD		 1259 (native-inputs
1260 `(("intltool" ,intltool)
1261 ("pkg-config" ,pkg-config)))
1262 (home-page "https://projects.gnome.org/gnome-print/home/faq.html")
1263 (synopsis "Printing framework for GNOME")
eb497b66 1264 (description (package-description libgnomeprint))
5698b8b8
JD		 1265 (license license:lgpl2.0+)))
1266
5698b8b8
JD		 1267(define-public libbonoboui
1268 (package
1269 (name "libbonoboui")
1270 (version "2.24.5")
1271 (source (origin
1272 (method url-fetch)
b38e45d8
EB		 1273 (uri (string-append "mirror://gnome/sources/" name "/"
1274 (version-major+minor version) "/"
1275 name "-" version ".tar.bz2"))
5698b8b8
JD		 1276 (sha256
1277 (base32
1278 "1kbgqh7bw0fdx4f1a1aqwpff7gp5mwhbaz60c6c98bc4djng5dgs"))))
1279 (build-system gnu-build-system)
1280 (arguments
1281 `(#:phases
1282 (alist-cons-before
1283 'check 'start-xserver
1284 (lambda* (#:key inputs #:allow-other-keys)
1285 (let ((xorg-server (assoc-ref inputs "xorg-server"))
1286 (disp ":1"))
2e6ecc5c 1287
5698b8b8
JD		 1288 (setenv "HOME" (getcwd))
1289 (setenv "DISPLAY" disp)
1290 ;; There must be a running X server and make check doesn't start one.
1291 ;; Therefore we must do it.
1292 (zero? (system (format #f "~a/bin/Xvfb ~a &" xorg-server disp)))))
1293 %standard-phases)))
1294 ;; Mentioned as Required by the .pc file
1295 (propagated-inputs `(("libxml2" ,libxml2)))
1296 (inputs
1297 `(("popt" ,popt)
1298 ("pangox-compat" ,pangox-compat)
1299 ("libgnome" ,libgnome)
1300 ("libgnomecanvas" ,libgnomecanvas)
1301 ("libglade" ,libglade)))
1302 (native-inputs
221ed17a
EB		 1303 `(("glib" ,glib "bin") ; for glib-genmarshal, etc.
1304 ("intltool" ,intltool)
5698b8b8
JD		 1305 ("xorg-server" ,xorg-server) ; For running the tests
1306 ("pkg-config" ,pkg-config)))
1307 (home-page "https://developer.gnome.org/libbonoboui/")
1308 (synopsis "Some user interface controls using Bonobo")
1309 (description "The Bonobo UI library provides a number of user interface
1310controls using the Bonobo component framework.")
1311 (license license:lgpl2.0+)))
1312
fecbf86e
SB		 1313(define-public libwnck
1314 (package
1315 (name "libwnck")
1316 (version "3.14.0")
1317 (source (origin
1318 (method url-fetch)
1319 (uri (string-append "mirror://gnome/sources/" name "/"
1320 (version-major+minor version) "/"
1321 name "-" version ".tar.xz"))
1322 (sha256
1323 (base32 "074jww04z8g9r1acndqap79wx4kbm3rpkf4lcg1v82b66iv0027m"))))
1324 (build-system gnu-build-system)
1325 (native-inputs
1326 `(("pkg-config" ,pkg-config)
1327 ("intltool" ,intltool)))
1328 (propagated-inputs
427476d5
SB		 1329 `(("gtk+" ,gtk+)
1330 ("libxres" ,libxres)
1331 ("startup-notification" ,startup-notification)))
fecbf86e
SB		 1332 (home-page "https://developer.gnome.org/libwnck/")
1333 (synopsis "Window Navigator Construction Kit")
1334 (description
1335 "Libwnck is the Window Navigator Construction Kit, a library for use in
1336writing pagers, tasklists, and more generally applications that are dealing
1337with window management. It tries hard to respect the Extended Window Manager
1338Hints specification (EWMH).")
1339 (license license:lgpl2.0+)))
1340
1341;; stable version for gtk2, required by xfwm4.
1342(define-public libwnck-1
1343 (package (inherit libwnck)
1344 (name "libwnck")
1345 (version "2.30.7")
1346 (source (origin
1347 (method url-fetch)
1348 (uri (string-append "mirror://gnome/sources/" name "/"
1349 (version-major+minor version) "/"
1350 name "-" version ".tar.xz"))
1351 (sha256
1352 (base32
1353 "15713yl0f8f3p99jzqqfmbicrdswd3vwpx7r3bkf1bgh6d9lvs4b"))))
1354 (propagated-inputs
427476d5
SB		 1355 `(("gtk+" ,gtk+-2)
1356 ("libxres" ,libxres)
1357 ("startup-notification" ,startup-notification)))))
b804c61e
JD		 1358
1359(define-public goffice
1360 (package
1361 (name "goffice")
1362 (version "0.10.14")
1363 (source (origin
1364 (method url-fetch)
b38e45d8
EB		 1365 (uri (string-append "mirror://gnome/sources/" name "/"
1366 (version-major+minor version) "/"
1367 name "-" version ".tar.xz"))
b804c61e
JD		 1368 (sha256
1369 (base32 "0kj0iwng6w4axm7yv2zy7myn5dhw5ilrlq2pzrjlm9i852ikqy60"))))
1370 (build-system gnu-build-system)
1371 (inputs
1372 `(("gtk+" ,gtk+)
1373 ("libgsf" ,libgsf)
1374 ("librsvg" ,librsvg)
1375 ("libxslt" ,libxslt)
1376 ("libxml2" ,libxml2)))
1377 (native-inputs
1378 `(("intltool" ,intltool)
f280cdb1 1379 ("glib" ,glib "bin")
b804c61e
JD		 1380 ("pkg-config" ,pkg-config)))
1381 (home-page "https://developer.gnome.org/goffice/")
1382 (synopsis "Document-centric objects and utilities")
1383 (description "A GLib/GTK+ set of document-centric objects and utilities.")
2e6ecc5c 1384 (license
b804c61e
JD		 1385 ;; Dual licensed under GPLv2 or GPLv3 (both without "or later")
1386 ;; Note: NOT LGPL
1387 (list license:gpl2 license:gpl3))))
1388
c024ae36
RW		 1389(define-public goffice-0.8
1390 (package (inherit goffice)
1391 (version "0.8.17")
1392 (source (origin
1393 (method url-fetch)
1394 (uri (string-append "mirror://gnome/sources/" (package-name goffice) "/"
1395 (version-major+minor version) "/"
1396 (package-name goffice) "-" version ".tar.xz"))
1397 (sha256
1398 (base32 "05fvzbs5bin05bbsr4dp79aiva3lnq0a3a40zq55i13vnsz70l0n"))))
1399 (arguments
1400 `(#:phases
1401 (alist-cons-after
1402 'unpack 'fix-pcre-check
1403 (lambda _
1404 ;; Only glib.h can be included directly. See
1405 ;; https://bugzilla.gnome.org/show_bug.cgi?id=670316
1406 (substitute* "configure"
1407 (("glib/gregex\\.h") "glib.h")) #t)
1408 %standard-phases)))
1409 (propagated-inputs
1410 ;; libgoffice-0.8.pc mentions libgsf-1
1411 `(("libgsf" ,libgsf)))
1412 (inputs
1413 `(("gtk" ,gtk+-2)
1414 ,@(alist-delete "gtk" (package-inputs goffice))))))
1415
b804c61e
JD		 1416(define-public gnumeric
1417 (package
1418 (name "gnumeric")
1419 (version "1.12.17")
1420 (source (origin
1421 (method url-fetch)
b38e45d8
EB		 1422 (uri (string-append "mirror://gnome/sources/" name "/"
1423 (version-major+minor version) "/"
1424 name "-" version ".tar.xz"))
b804c61e
JD		 1425 (sha256
1426 (base32
1427 "18bvc3phghr4p5440fp8hm6gvp53d3mqs9cyc637zpmk0b6bcp7c"))))
1428 (build-system gnu-build-system)
1429 (arguments
1430 `(;; The gnumeric developers don't worry much about failing tests.
1431 ;; See https://bugzilla.gnome.org/show_bug.cgi?id=732387
2e6ecc5c 1432 #:tests? #f
b804c61e
JD		 1433 #:phases
1434 (alist-cons-before
1435 'configure 'pre-conf
1436 (lambda* (#:key outputs #:allow-other-keys)
1437 ;; Make install tries to write into the directory of goffice
1438 ;; I am informed that this only affects the possibility to embed a
1439 ;; spreadsheet inside an Abiword document. So presumably when we
1440 ;; package Abiword we'll have to refer it to this directory.
2e6ecc5c 1441 (substitute* "configure"
b804c61e 1442 (("^GOFFICE_PLUGINS_DIR=.*")
2e6ecc5c 1443 (string-append "GOFFICE_PLUGINS_DIR="
b804c61e
JD		 1444 (assoc-ref outputs "out") "/goffice/plugins"))))
1445 %standard-phases)))
1446 (inputs
1447 `(("glib" ,glib)
1448 ("gtk+" ,gtk+)
1449 ("goffice" ,goffice)
1450 ("libgsf" ,libgsf)
1451 ("libxml2" ,libxml2)
1452 ("zlib" ,zlib)))
1453 (native-inputs
1454 `(("intltool" ,intltool)
b9663471 1455 ("glib:bin" ,glib "bin")
b804c61e
JD		 1456 ("pkg-config" ,pkg-config)))
1457 (home-page "http://www.gnumeric.org")
66672a45
LC		 1458 (synopsis "Spreadsheet application")
1459 (description
1460 "GNUmeric is a GNU spreadsheet application, running under GNOME. It is
1461interoperable with other spreadsheet applications. It has a vast array of
1462features beyond typical spreadsheet functionality, such as support for linear
1463and non-linear solvers, statistical analysis, and telecommunication
1464engineering.")
1465 (license
b804c61e
JD		 1466 ;; Dual licensed under GPLv2 or GPLv3 (both without "or later")
1467 (list license:gpl2 license:gpl3))))
6f885c05
FB		 1468
1469(define-public gnome-themes-standard
1470 (package
1471 (name "gnome-themes-standard")
1472 ;; The version of this package should be the same as the version of
1473 ;; gnome-desktop.
1474 (version (package-version gnome-desktop))
1475 (source
1476 (origin
1477 (method url-fetch)
2e6ecc5c 1478 (uri (string-append "mirror://gnome/sources/" name "/"
6f885c05
FB		 1479 (version-major+minor version) "/" name "-"
1480 version ".tar.xz"))
1481 (sha256
1482 (base32
7dae5ac4 1483 "0kyrbfrgl6g6wm6zpllldz36fclvl8vwmn1snwk18kf7f6ncpsac"))))
6f885c05
FB		 1484 (build-system gnu-build-system)
1485 (inputs
1486 `(("gtk+" ,gtk+)
1487 ("gtk+-2" ,gtk+-2)
1488 ("librsvg" ,librsvg)
1489 ("libxml2" ,libxml2)
1490 ("glib" ,glib)))
1491 (native-inputs
1492 `(("intltool" ,intltool)
1493 ("glib:bin" ,glib "bin")
1494 ("pkg-config" ,pkg-config)))
1495 (arguments
1496 `(#:phases
1497 (alist-cons-before
1498 'build 'use-full-cache
1499 ;; Use librsvg's loaders.cache instead of the one provided by
1500 ;; gdk-pixbuf because the latter does not include support for SVG
1501 ;; files.
1502 (lambda* (#:key inputs #:allow-other-keys)
2e6ecc5c
AE		 1503 (setenv "GDK_PIXBUF_MODULE_FILE"
1504 (car (find-files (assoc-ref inputs "librsvg")
6f885c05
FB		 1505 "loaders\\.cache"))))
1506 %standard-phases)))
1507 (home-page "https://launchpad.net/gnome-themes-standard")
1508 (synopsis "Default GNOME 3 themes")
1509 (description
1510 "The default GNOME 3 themes (Adwaita and some accessibility themes).")
1511 (license license:lgpl2.1+)))
5a659a48 1512
df90c701
RW		 1513(define-public seahorse
1514 (package
1515 (name "seahorse")
1516 (version "3.16.0")
1517 (source
1518 (origin
1519 (method url-fetch)
1520 (uri (string-append "mirror://gnome/sources/" name "/"
1521 (version-major+minor version) "/" name "-"
1522 version ".tar.xz"))
1523 (sha256
1524 (base32
1525 "0cg1grgpwbfkiny5148n17rzpc8kswyr5yff0kpm8l3lp01my2kp"))))
1526 (build-system glib-or-gtk-build-system)
1527 (inputs
1528 `(("gtk+" ,gtk+)
1529 ("gcr" ,gcr)
1530 ("gnupg" ,gnupg-1)
1531 ("gpgme" ,gpgme)
1532 ("libsecret" ,libsecret)))
1533 (native-inputs
1534 `(("intltool" ,intltool)
1535 ("glib:bin" ,glib "bin")
1536 ("itstool" ,itstool)
1537 ("pkg-config" ,pkg-config)))
1538 (home-page "https://launchpad.net/gnome-themes-standard")
1539 (synopsis "Manage encryption keys and passwords in the GNOME keyring")
1540 (description
1541 "Seahorse is a GNOME application for managing encryption keys and
1542passwords in the GNOME keyring.")
1543 (license license:gpl2+)))
1544
5a659a48
SB		 1545(define-public vala
1546 (package
1547 (name "vala")
1ea90625 1548 (version "0.28.0")
5a659a48
SB		 1549 (source (origin
1550 (method url-fetch)
1551 (uri (string-append "mirror://gnome/sources/" name "/"
1552 (version-major+minor version) "/"
1553 name "-" version ".tar.xz"))
1554 (sha256
1555 (base32
1ea90625 1556 "0zwpzhkhfk3piya14m7p2hl2vaabahprphppfm46ci91z39kp7hd"))))
5a659a48 1557 (build-system gnu-build-system)
1ea90625
SB		 1558 (arguments
1559 '(#:phases
1560 (modify-phases %standard-phases
1561 (add-before 'check 'set-cc
1562 (lambda _
1563 (setenv "CC" "gcc")
1564 #t)))))
5a659a48
SB		 1565 (native-inputs
1566 `(("pkg-config" ,pkg-config)
1567 ("flex" ,flex)
1568 ("bison" ,bison)
1569 ("xsltproc" ,libxslt)
1570 ("dbus" ,dbus) ; for dbus tests
1571 ("gobject-introspection" ,gobject-introspection))) ; for gir tests
1572 (propagated-inputs
1573 `(("glib" ,glib))) ; required by libvala-0.26.pc
1574 (home-page "http://live.gnome.org/Vala/")
1575 (synopsis "Compiler for the GObject type system")
1576 (description
1577 "Vala is a programming language that aims to bring modern programming
1578language features to GNOME developers without imposing any additional runtime
1579requirements and without using a different ABI compared to applications and
1580libraries written in C.")
1581 (license license:lgpl2.1+)))
ea57378f
SB		 1582
1583(define-public vte
1584 (package
1585 (name "vte")
191e9b4e 1586 (version "0.40.0")
ea57378f
SB		 1587 (source (origin
1588 (method url-fetch)
1589 (uri (string-append "mirror://gnome/sources/" name "/"
1590 (version-major+minor version) "/"
1591 name "-" version ".tar.xz"))
1592 (sha256
1593 (base32
191e9b4e 1594 "0lnq0bgkmsixjwmfacb2ch9qfjqjxa8zkk1hiv3l29kgca0n3nal"))))
ea57378f
SB		 1595 (build-system gnu-build-system)
1596 (native-inputs
1597 `(("pkg-config" ,pkg-config)
1598 ("intltool" ,intltool)
1599 ("vala" ,vala)
1600 ("gobject-introspection" ,gobject-introspection)
1601 ("glib" ,glib "bin") ; for glib-genmarshal, etc.
1602 ("xmllint" ,libxml2)))
1603 (propagated-inputs
302393bc
LC		 1604 `(("gtk+" ,gtk+) ;required by vte-2.91.pc
1605 ("gnutls" ,gnutls))) ;ditto
ea57378f
SB		 1606 (home-page "http://www.gnome.org/")
1607 (synopsis "Virtual Terminal Emulator")
1608 (description
1609 "VTE is a library (libvte) implementing a terminal emulator widget for
1610GTK+, and a minimal sample application (vte) using that. Vte is mainly used in
1611gnome-terminal, but can also be used to embed a console/terminal in games,
1612editors, IDEs, etc.")
1613 (license license:lgpl2.1+)))
1614
1615;; stable version for gtk2, required by xfce4-terminal.
1616(define-public vte/gtk+-2
1617 (package (inherit vte)
1618 (name "vte")
1619 (version "0.28.2")
1620 (source (origin
1621 (method url-fetch)
1622 (uri (string-append "mirror://gnome/sources/" name "/"
1623 (version-major+minor version) "/"
1624 name "-" version ".tar.xz"))
1625 (sha256
1626 (base32
1627 "1bmhahkf8wdsra9whd3k5l5z4rv7r58ksr8mshzajgq2ma0hpkw6"))))
1628 (arguments
1629 '(#:configure-flags '("--disable-python")))
1630 (native-inputs
1631 `(("pkg-config" ,pkg-config)
1632 ("intltool" ,intltool)
1633 ("glib" ,glib "bin"))) ; for glib-genmarshal, etc.
1634 (propagated-inputs
1635 `(("gtk+" ,gtk+-2) ; required by libvte.pc
1636 ("ncurses" ,ncurses))))) ; required by libvte.la
b47e1b20
FB		 1637
1638(define-public dconf
1639 (package
1640 (name "dconf")
1641 (version "0.22.0")
1642 (source (origin
1643 (method url-fetch)
1644 (uri (string-append
2e6ecc5c 1645 "mirror://gnome/sources/" name "/"
b47e1b20
FB		 1646 (version-major+minor version) "/"
1647 name "-" version ".tar.xz"))
1648 (sha256
1649 (base32 "13jb49504bir814v8n8vjip5sazwfwsrnniw87cpg7phqfq7q9qa"))))
1650 (build-system glib-or-gtk-build-system)
1651 (inputs
1652 `(("gtk+" ,gtk+)
1653 ("glib" ,glib)
1654 ("dbus" ,dbus)
1655 ("libxml2" ,libxml2)))
1656 (native-inputs
1657 `(("libxslt" ,libxslt)
1658 ("docbook-xml" ,docbook-xml-4.2)
1659 ("docbook-xsl" ,docbook-xsl)
1660 ("intltool" ,intltool)
1661 ("pkg-config" ,pkg-config)))
1662 (arguments
1663 `(#:tests? #f ; To contact dbus it needs to load /var/lib/dbus/machine-id
1664 ; or /etc/machine-id.
1665 #:configure-flags
1666 ;; Set the correct RUNPATH in binaries.
2e6ecc5c 1667 (list (string-append "LDFLAGS=-Wl,-rpath="
b47e1b20
FB		 1668 (assoc-ref %outputs "out") "/lib")
1669 "--disable-gtk-doc-html") ; FIXME: requires gtk-doc
1670 #:phases
1671 (alist-cons-before
1672 'configure 'fix-docbook
1673 (lambda* (#:key inputs #:allow-other-keys)
1674 (substitute* "docs/Makefile.in"
1675 (("http://docbook.sourceforge.net/release/xsl/current/manpages/docbook.xsl")
2e6ecc5c 1676 (string-append (assoc-ref inputs "docbook-xsl")
b47e1b20
FB		 1677 "/xml/xsl/docbook-xsl-"
1678 ,(package-version docbook-xsl)
1679 "/manpages/docbook.xsl")))
2e6ecc5c
AE		 1680 (setenv "XML_CATALOG_FILES"
1681 (string-append (assoc-ref inputs "docbook-xml")
b47e1b20
FB		 1682 "/xml/dtd/docbook/catalog.xml")))
1683 %standard-phases)))
1684 (home-page "https://developer.gnome.org/dconf")
1685 (synopsis "Low-level GNOME configuration system")
1686 (description "Dconf is a low-level configuration system. Its main purpose
1687is to provide a backend to GSettings on platforms that don't already have
1688configuration storage systems.")
1689 (license license:lgpl2.1)))
109da1c0
AE		 1690
1691(define-public json-glib
1692 (package
1693 (name "json-glib")
1694 (version "1.0.2")
1695 (source (origin
1696 (method url-fetch)
1697 (uri (string-append "mirror://gnome/sources/" name "/"
1698 (version-major+minor version) "/"
1699 name "-" version ".tar.xz"))
1700 (sha256
1701 (base32
1702 "02k66lpc4cmgygj66n8zcy59bggy7yzm3v4hni9xqplgva9d2yw8"))))
1703 (build-system gnu-build-system)
1704 (native-inputs
88c6b580 1705 `(("glib" ,glib "bin") ;for glib-mkenums and glib-genmarshal
109da1c0
AE		 1706 ("gobject-introspection" ,gobject-introspection)
1707 ("pkg-config" ,pkg-config)))
1708 (propagated-inputs
88c6b580 1709 `(("glib" ,glib))) ;according to json-glib-1.0.pc
109da1c0
AE		 1710 (home-page "https://wiki.gnome.org/Projects/JsonGlib")
1711 (synopsis "Compiler for the GObject type system")
1712 (description "JSON-GLib is a C library based on GLib providing
1713serialization and deserialization support for the JavaScript Object Notation
1714(JSON) format described by RFC 4627. It provides parser and generator
1715GObject classes and various wrappers for the complex data types employed by
1716JSON, such as arrays and objects.")
1717 (license license:lgpl2.1+)))
6f96a359
SB		 1718
1719(define-public libxklavier
1720 (package
1721 (name "libxklavier")
1722 (version "5.3")
1723 (source (origin
1724 (method url-fetch)
1725 (uri (string-append "mirror://gnome/sources/" name "/"
1726 version "/" name "-" version ".tar.xz"))
1727 (sha256
1728 (base32
1729 "016lpdv35z0qsw1cprdc2k5qzkdi5waj6qmr0a2q6ljn9g2kpv7b"))))
1730 (build-system gnu-build-system)
1731 (arguments
1732 '(#:configure-flags
1733 (list (string-append "--with-xkb-base="
1734 (assoc-ref %build-inputs "xkeyboard-config")
b19d6805 1735 "/share/X11/xkb"))))
6f96a359
SB		 1736 (native-inputs
1737 `(("glib:bin" ,glib "bin") ; for glib-mkenums, etc.
1738 ("gobject-introspection" ,gobject-introspection)
1739 ("pkg-config" ,pkg-config)))
1740 (propagated-inputs
1741 ;; Required by libxklavier.pc.
1742 `(("glib" ,glib)
1743 ("libxml2" ,libxml2)))
1744 (inputs
1745 `(("iso-codes" ,iso-codes)
1746 ("libxi" ,libxi)
1747 ("libxkbfile" ,libxkbfile)
1748 ("xkbcomp" ,xkbcomp)
1749 ("xkeyboard-config" ,xkeyboard-config)))
1750 (home-page "http://www.freedesktop.org/wiki/Software/LibXklavier/")
1751 (synopsis "High-level API for X Keyboard Extension")
1752 (description
1753 "LibXklavier is a library providing high-level API for X Keyboard
1754Extension known as XKB. This library is indended to support XFree86 and other
1755commercial X servers. It is useful for creating XKB-related software (layout
1756indicators etc).")
1757 (license license:lgpl2.0+)))
619936a4
LC		 1758
1759(define-public python2-rsvg
1760 ;; XXX: This is actually a subset of gnome-python-desktop.
1761 (package
1762 (name "python2-rsvg")
1763 (version "2.32.0")
1764 (source
1765 (origin
1766 (method url-fetch)
1767 (uri (string-append
1768 "mirror://gnome/sources/gnome-python-desktop/2.32/gnome-python-desktop-"
1769 version ".tar.bz2"))
1770 (sha256
1771 (base32
1772 "1s8f9rns9v7qlwjv9qh9lr8crp88dpzfm45hj47zc3ivpy0dbnq9"))))
1773 (build-system gnu-build-system)
1774 (native-inputs
1775 `(("pkg-config" ,pkg-config)))
1776 (inputs
1777 `(("python" ,python-2)
1778 ("python2-pygtk" ,python2-pygtk)
1779 ("librsvg" ,librsvg)))
1780 (home-page "http://www.gnome.org")
1781 (synopsis "Python bindings to librsvg")
1782 (description
1783 "This packages provides Python bindings to librsvg, the SVG rendering
1784library.")
1785
1786 ;; This is the license of the rsvg bindings. The license of each module
1787 ;; of gnome-python-desktop is given in 'COPYING'.
1788 (license license:lgpl2.1+)))
a31a6d22 1789
f2ca414a
SB		 1790(define-public glib-networking
1791 (package
1792 (name "glib-networking")
1793 (version "2.44.0")
1794 (source (origin
1795 (method url-fetch)
1796 (uri (string-append "mirror://gnome/sources/glib-networking/"
1797 (version-major+minor version) "/"
1798 name "-" version ".tar.xz"))
1799 (sha256
1800 (base32
1801 "0ij33bhvn7y5gagx4sbrw906dsjjjs9dllxn73pzv6x97c6k92lg"))))
1802 (build-system gnu-build-system)
1803 (arguments
1804 `(#:configure-flags
1805 ;; FIXME: ca-certificates.crt is not available in the build environment.
1806 '("--with-ca-certificates=no")
1807 #:phases
1808 (modify-phases %standard-phases
3a4de6b2 1809 (add-before 'configure 'patch-giomoduledir
f2ca414a
SB		 1810 ;; Install GIO modules into $out/lib/gio/modules.
1811 (lambda _
1812 (substitute* "configure"
1813 (("GIO_MODULE_DIR=.*")
1814 (string-append "GIO_MODULE_DIR=" %output
1815 "/lib/gio/modules\n"))))))))
1816 (native-inputs
1817 `(("pkg-config" ,pkg-config)
1818 ("intltool" ,intltool)))
1819 (inputs
1820 `(("glib" ,glib)
1821 ("gnutls" ,gnutls)
1822 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
1823 ("p11-kit" ,p11-kit)))
1824 (home-page "http://www.gnome.org")
1825 (synopsis "Network-related GIO modules")
1826 (description
1827 "This package contains various network related extensions for the GIO
1828library.")
1829 (license license:lgpl2.0+)))
1830
6e1bb642
SB		 1831(define-public libsoup
1832 (package
1833 (name "libsoup")
1834 (version "2.50.0")
1835 (source (origin
1836 (method url-fetch)
1837 (uri (string-append "mirror://gnome/sources/libsoup/"
1838 (version-major+minor version) "/"
1839 name "-" version ".tar.xz"))
1840 (sha256
1841 (base32
1842 "0yv61y5vfar1rfksa6f53zhfw9wcb39zjix8gqc1ff5gqid3c08y"))))
1843 (build-system gnu-build-system)
1844 (outputs '("out" "doc"))
1845 (arguments
b19d6805 1846 `(#:configure-flags
6e1bb642
SB		 1847 (list (string-append "--with-html-dir="
1848 (assoc-ref %outputs "doc")
1849 "/share/gtk-doc/html")
1850 ;; To find GIO modules from glib-networking.
1851 (string-append "GIO_EXTRA_MODULES="
1852 (assoc-ref %build-inputs "glib-networking")
1853 "/lib/gio/modules"))
1854 #:phases
1855 (modify-phases %standard-phases
3a4de6b2 1856 (add-before 'configure 'disable-unconnected-socket-test
6e1bb642
SB		 1857 ;; This test fails due to missing /etc/nsswitch.conf
1858 ;; in the build environment.
1859 (lambda _
1860 (substitute* "tests/socket-test.c"
1861 ((".*/sockets/unconnected.*") ""))
1862 #t))
3a4de6b2 1863 (add-before 'check 'unset-LC_ALL
6e1bb642
SB		 1864 ;; The 'check-local' target runs 'env LANG=C sort -u',
1865 ;; unset 'LC_ALL' to make 'LANG' working.
1866 (lambda _
1867 (unsetenv "LC_ALL")
1868 #t)))))
1869 (native-inputs
1870 `(("glib:bin" ,glib "bin") ; for glib-mkenums
1871 ("gobject-introspection" ,gobject-introspection)
1872 ("intltool" ,intltool)
1873 ("pkg-config" ,pkg-config)
1874 ("python" ,python-wrapper)
1875 ;; These are needed for the tests.
1876 ;; FIXME: Add PHP once available.
1877 ("curl" ,curl)
1878 ("httpd" ,httpd)))
1879 (propagated-inputs
1880 ;; libsoup-2.4.pc refers to all these.
1881 `(("glib" ,glib)
1882 ("libxml2" ,libxml2)))
1883 (inputs
1884 `(("glib-networking" ,glib-networking)
1885 ("sqlite" ,sqlite)))
1886 (home-page "https://live.gnome.org/LibSoup/")
1887 (synopsis "GLib-based HTTP Library")
1888 (description
1889 "LibSoup is an HTTP client/server library for GNOME. It uses GObjects
1890and the GLib main loop, to integrate well with GNOME applications.")
1891 (license license:lgpl2.0+)))
1892
bba229a3
SB		 1893(define-public libsecret
1894 (package
1895 (name "libsecret")
1896 (version "0.18")
1897 (source (origin
1898 (method url-fetch)
1899 (uri (string-append
1900 "mirror://gnome/sources/libsecret/" version "/"
1901 name "-" version ".tar.xz"))
1902 (sha256
1903 (base32
1904 "1qq29c01xxjyx5sl6y5h22w8r0ff4c73bph3gfx3h7mx5mvalwqc"))))
1905 (build-system gnu-build-system)
1906 (outputs '("out" "doc"))
1907 (arguments
1908 `(#:tests? #f ; FIXME: Testing hangs.
bba229a3
SB		 1909 #:configure-flags
1910 (list (string-append "--with-html-dir="
1911 (assoc-ref %outputs "doc")
1912 "/share/gtk-doc/html"))))
1913 (native-inputs
1914 `(("glib:bin" ,glib "bin") ; for gdbus-codegen, etc.
1915 ("gobject-introspection" ,gobject-introspection)
1916 ("intltool" ,intltool)
1917 ("pkg-config" ,pkg-config)
1918 ("vala" ,vala)
1919 ("xsltproc" ,libxslt)))
1920 ;; These are needed for the tests.
1921 ;; FIXME: Add gjs once available.
1922 ;("dbus" ,dbus)
1923 ;("python2" ,python-2)
1924 ;("python2-dbus" ,python2-dbus)
1925 ;("python2-pygobject" ,python2-pygobject)
1926 ;("python2-pygobject-2" ,python2-pygobject-2)))
1927 (propagated-inputs
1928 `(("glib" ,glib))) ; required by libsecret-1.pc
1929 (inputs
1930 `(("docbook-xsl" ,docbook-xsl)
1931 ("libgcrypt" ,libgcrypt)
1932 ("libxml2" ,libxml2))) ; for XML_CATALOG_FILES
1933 (home-page "https://wiki.gnome.org/Projects/Libsecret/")
1934 (synopsis "GObject bindings for \"Secret Service\" API")
1935 (description
1936 "Libsecret is a GObject based library for storing and retrieving passwords
1937and other secrets. It communicates with the \"Secret Service\" using DBus.")
1938 (license license:lgpl2.1+)))
1939
a31a6d22
SB		 1940(define-public gnome-mines
1941 (package
1942 (name "gnome-mines")
121398e7 1943 (version "3.16.0")
a31a6d22
SB		 1944 (source
1945 (origin
1946 (method url-fetch)
1947 (uri (string-append "mirror://gnome/sources/" name "/"
1948 (version-major+minor version) "/"
1949 name "-" version ".tar.xz"))
1950 (sha256
1951 (base32
121398e7 1952 "0wfvqyryc1093l4dr75zv9h0jyn28z6wirdq03lm5w24qf9lvjjx"))))
a31a6d22
SB		 1953 (build-system glib-or-gtk-build-system)
1954 (arguments
1955 '(#:phases
1956 (modify-phases %standard-phases
f8503e2b 1957 (add-before 'configure 'patch-/bin/true
a31a6d22
SB		 1958 (lambda _
1959 (substitute* "configure"
1960 (("/bin/true") (which "true")))))
f8503e2b 1961 (add-after 'install 'wrap-pixbuf
a31a6d22
SB		 1962 ;; Use librsvg's loaders.cache to support SVG files.
1963 (lambda* (#:key inputs outputs #:allow-other-keys)
1964 (let* ((out (assoc-ref outputs "out"))
1965 (prog (string-append out "/bin/gnome-mines"))
1966 (rsvg (assoc-ref inputs "librsvg"))
1967 (pixbuf (find-files rsvg "^loaders\\.cache$")))
1968 (wrap-program prog
1969 `("GDK_PIXBUF_MODULE_FILE" = ,pixbuf))))))))
1970 (native-inputs
1971 `(("pkg-config" ,pkg-config)
1972 ("desktop-file-utils" ,desktop-file-utils)
1973 ("intltool" ,intltool)
1974 ("itstool" ,itstool)))
1975 (inputs
1976 `(("gtk+" ,gtk+)
1977 ("librsvg" ,librsvg)))
1978 (home-page "https://wiki.gnome.org/Apps/Mines")
1979 (synopsis "Minesweeper game")
1980 (description
1981 "Mines (previously gnomine) is a puzzle game where you locate mines
1982floating in an ocean using only your brain and a little bit of luck.")
1983 (license license:gpl2+)))
88f70665
AW		 1984
1985(define-public gnome-terminal
1986 (package
1987 (name "gnome-terminal")
1988 (version "3.16.0")
1989 (source
1990 (origin
1991 (method url-fetch)
1992 (uri (string-append "mirror://gnome/sources/" name "/"
1993 (version-major+minor version) "/"
1994 name "-" version ".tar.xz"))
1995 (sha256
1996 (base32
1997 "1s3zwqxs4crlqmh6l7s7n87pbmh2nnjdvhxlkalh58pbl0bk0qrd"))))
1998 (build-system glib-or-gtk-build-system)
1999 (arguments
2000 '(#:configure-flags
2001 (list "--disable-migration" "--disable-search-provider"
2002 "--without-nautilus-extension")
2003 #:phases
2004 (modify-phases %standard-phases
3a4de6b2 2005 (add-before 'configure 'patch-/bin/true
88f70665
AW		 2006 (lambda _
2007 (substitute* "configure"
2008 (("/bin/true") (which "true"))))))))
2009 (native-inputs
2010 `(("pkg-config" ,pkg-config)
2011 ("desktop-file-utils" ,desktop-file-utils)
2012 ("intltool" ,intltool)
2013 ("itstool" ,itstool)))
2014 (inputs
2015 `(("gtk+" ,gtk+)
2016 ("vte" ,vte)
2017 ("gnutls" ,gnutls)
2018 ("dconf" ,dconf)
2019 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
2020 ("util-linux" ,util-linux)
2021 ("vala" ,vala)))
2022 (home-page "https://wiki.gnome.org/Apps/Terminal")
2023 (synopsis "Terminal emulator")
2024 (description
2025 "GNOME Terminal is a terminal emulator application for accessing a
2026UNIX shell environment which can be used to run programs available on
2027your system.
2028
2029It supports several profiles, multiple tabs and implements several
2030keyboard shortcuts.")
2031 (license license:gpl3+)))
75016d07
AW		 2032
2033(define-public colord
2034 (package
2035 (name "colord")
2036 (version "1.1.8")
2037 (source
2038 (origin
2039 (method url-fetch)
2040 (uri (string-append "http://www.freedesktop.org/software/colord/releases/"
2041 name "-" version ".tar.xz"))
2042 (sha256
2043 (base32
2044 "01w97rgzk4qi6fp03scq5jyw0ayx11b479p7dkm2r77k84b9agph"))))
2045 (build-system glib-or-gtk-build-system)
2046 (arguments
2047 '(;; The tests want to run valgrind. Punt for now.
2048 #:tests? #f
2049 #:configure-flags (list "--localstatedir=/var"
2050 ;; GUSB not packaged yet.
2051 "--disable-gusb"
2052 ;; No dep on systemd.
2053 "--disable-systemd-login"
2054 ;; Wants to install to global completion dir;
2055 ;; punt.
2056 "--disable-bash-completion"
2057 ;; colord-gtk not packaged yet.
2058 "--disable-session-example"
2059 "--with-daemon-user=colord"
2060 "--enable-sane"
2061 (string-append "--with-udevrulesdir="
2062 (assoc-ref %outputs "out")
2063 "/lib/udev/rules.d"))
2064 #:phases
2065 (modify-phases %standard-phases
3a4de6b2 2066 (add-before 'configure 'patch-/bin/true
75016d07
AW		 2067 (lambda _
2068 (substitute* "configure"
2069 (("/bin/true") (which "true")))
2070 (substitute* "src/Makefile.in"
2071 (("if test -w \\$\\(DESTDIR\\)\\$\\(prefix\\)/;")
b19d6805 2072 "if test -w $(DESTDIR)$(localstatedir);")))))))
75016d07
AW		 2073 (native-inputs
2074 `(("pkg-config" ,pkg-config)
2075 ("gobject-introspection" ,gobject-introspection)
2076 ("libtool" ,libtool)
2077 ("intltool" ,intltool)))
2078 (inputs
2079 `(("eudev" ,eudev)
75016d07
AW		 2080 ("dbus-glib" ,dbus-glib)
2081 ("libusb" ,libusb)
2082 ("lcms" ,lcms)
2083 ("sqlite" ,sqlite)
2084 ("polkit" ,polkit)
2085 ("sane-backends" ,sane-backends)))
2086 (home-page "http://www.freedesktop.org/software/colord/")
2087 (synopsis "Color management service")
2088 (description "Colord is a system service that makes it easy to manage,
2089install and generate color profiles to accurately color manage input and
2090output devices.")
2091 (license license:gpl2+)))
7b2abd00
AW		 2092
2093(define-public geoclue
2094 (package
2095 (name "geoclue")
2096 (version "2.1.10")
2097 (source
2098 (origin
2099 (method url-fetch)
2100 (uri (string-append "http://www.freedesktop.org/software/" name
2101 "/releases/" (version-major+minor version) "/"
2102 name "-" version ".tar.xz"))
2103 (sha256
2104 (base32
2105 "0s0ws2bx5g1cbjamxmm448r4n4crha2fwpzm8zbx6cq6qslygmzi"))
2106 (patches (list (search-patch "geoclue-config.patch")))))
2107 (build-system glib-or-gtk-build-system)
2108 (arguments
2109 '(;; The tests want to run the system bus.
2110 #:tests? #f
2111 #:configure-flags (list ;; Disable bits requiring ModemManager.
2112 "--disable-3g-source"
2113 "--disable-cdma-source"
2114 "--disable-modem-gps-source"
2115 "--with-dbus-service-user=geoclue")
2116 #:phases
2117 (modify-phases %standard-phases
3a4de6b2 2118 (add-before 'configure 'patch-/bin/true
7b2abd00
AW		 2119 (lambda _
2120 (substitute* "configure"
2121 (("/bin/true") (which "true"))))))))
2122 (native-inputs
2123 `(("pkg-config" ,pkg-config)
2124 ("intltool" ,intltool)))
2125 (inputs
2126 `(("glib" ,glib)
2127 ("json-glib" ,json-glib)
2128 ("libsoup" ,libsoup)))
2129 (home-page "http://freedesktop.org/wiki/Software/GeoClue/")
2130 (synopsis "Geolocation service")
2131 (description "Geoclue is a D-Bus service that provides location
2132information. The primary goal of the Geoclue project is to make creating
2133location-aware applications as simple as possible, while the secondary goal is
2134to ensure that no application can access location information without explicit
2135permission from user. ")
2136 (license license:gpl2+)))
2bfe7437
AW		 2137
2138(define-public geocode-glib
2139 (package
2140 (name "geocode-glib")
2141 (version "3.16.0")
2142 (source (origin
2143 (method url-fetch)
2144 (uri (string-append "mirror://gnome/sources/geocode-glib/"
2145 (version-major+minor version) "/"
2146 name "-" version ".tar.xz"))
2147 (sha256
2148 (base32
2149 "1cbfv0kds6b6k0cl7q47xpj3x1scwcd7m68zl1rf7i4hmhw4hpqj"))))
2150 (build-system gnu-build-system)
2151 (arguments
2152 `(;; The tests want to write to $HOME/.cache/geocode-glib, which doesn't
2153 ;; work for the builder. Punt.
2154 #:tests? #f
2bfe7437
AW		 2155 ))
2156 (native-inputs
2157 `(("glib:bin" ,glib "bin") ; for glib-mkenums
2158 ("gobject-introspection" ,gobject-introspection)
2159 ("pkg-config" ,pkg-config)
2160 ("json-glib" ,json-glib)))
2161 (propagated-inputs
2162 ;; geocode-glib-1.0.pc refers to GIO.
2163 `(("glib" ,glib)))
2164 (inputs
2165 `(("libsoup" ,libsoup)))
2166 (home-page "https://github.com/GNOME/geocode-glib/")
2167 (synopsis "Geocoding and reverse-geocoding library")
2168 (description
2169 "geocode-glib is a convenience library for geocoding (finding longitude,
2170and latitude from an address) and reverse geocoding (finding an address from
2171coordinates) using the Nominatim service. geocode-glib caches requests for
2172faster results and to avoid unnecessary server load.")
2173 (license license:lgpl2.0+)))
a1d5bb0e
AW		 2174
2175(define-public upower
2176 (package
2177 (name "upower")
2178 (version "0.99.2")
2179 (source (origin
2180 (method url-fetch)
2181 (uri (string-append "http://upower.freedesktop.org/releases/"
2182 name "-" version ".tar.xz"))
2183 (sha256
2184 (base32
2185 "0vwlh20jmaf01m38kfn8yx2869a3clmkzlycrj99rf4nvwx4bp79"))
2186 (patches (list (search-patch "upower-builddir.patch")))))
2187 (build-system glib-or-gtk-build-system)
2188 (arguments
2189 '( ;; The tests want to contact the system bus, which can't be done in the
2190 ;; build environment. The integration test can run, but the last of
2191 ;; the up-self-tests doesn't. Disable tests for now.
2192 #:tests? #f
2193 #:configure-flags (list "--localstatedir=/var"
2194 (string-append "--with-udevrulesdir="
2195 (assoc-ref %outputs "out")
2196 "/lib/udev/rules.d"))
2197 #:phases
2198 (modify-phases %standard-phases
2199 (add-before 'configure 'patch-/bin/true
2200 (lambda _
2201 (substitute* "configure"
2202 (("/bin/true") (which "true")))))
2203 (add-before 'configure 'patch-integration-test
2204 (lambda _
2205 (substitute* "src/linux/integration-test"
2206 (("/usr/bin/python3") (which "python3"))))))))
2207 (native-inputs
2208 `(("pkg-config" ,pkg-config)
2209 ("intltool" ,intltool)
2210 ("python" ,python)))
2211 (inputs
2212 `(("eudev" ,eudev)
a1d5bb0e
AW		 2213 ("dbus-glib" ,dbus-glib)
2214 ("libusb" ,libusb)))
2215 (home-page "http://upower.freedesktop.org/")
2216 (synopsis "System daemon for managing power devices")
2217 (description
2218 "UPower is an abstraction for enumerating power devices,
2219listening to device events and querying history and statistics. Any
2220application or service on the system can access the org.freedesktop.UPower
2221service via the system message bus.")
2222 (license license:gpl2+)))
6a180f6f
AW		 2223
2224(define-public libgweather
2225 (package
2226 (name "libgweather")
2227 (version "3.16.0")
2228 (source (origin
2229 (method url-fetch)
2230 (uri (string-append "mirror://gnome/sources/" name "/"
2231 (version-major+minor version) "/"
2232 name "-" version ".tar.xz"))
2233 (sha256
2234 (base32
2235 "0x1z6wv7hdw2ivlkifcbd940zyrnvqvc4zh2drgvd2r6jmd7bjza"))))
2236 (build-system gnu-build-system)
2237 (arguments
2238 `(;; The tests want to write to $HOME/.cache/geocode-glib, which doesn't
2239 ;; work for the builder. Punt.
2240 #:tests? #f
6a180f6f
AW		 2241 #:configure-flags
2242 `(;; No introspection for now, as it wants to install to
2243 ;; gobject-introspection's own directory and I don't know how to easily
2244 ;; override this.
2245 "--enable-introspection=no"
2246 ,(string-append "--with-zoneinfo-dir="
2247 (assoc-ref %build-inputs "tzdata")
2248 "/share/zoneinfo"))))
2249 (native-inputs
2250 `(("glib:bin" ,glib "bin") ; for glib-mkenums
2251 ("pkg-config" ,pkg-config)
2252 ("intltool" ,intltool)))
2253 (propagated-inputs
2254 ;; gweather-3.0.pc refers to GTK+, GDK-Pixbuf, GLib/GObject, libxml, and
2255 ;; libsoup.
2256 `(("gtk+" ,gtk+)
2257 ("gdk-pixbuf" ,gdk-pixbuf)
2258 ("libxml2" ,libxml2)
2259 ("libsoup" ,libsoup)))
2260 (inputs
2261 `(("tzdata" ,tzdata)
2262 ("geocode-glib" ,geocode-glib)))
2263 (home-page "https://wiki.gnome.org/action/show/Projects/LibGWeather")
2264 (synopsis "Location, time zone, and weather library for GNOME")
2265 (description
2266 "libgweather is a library to access weather information from online
2267services for numerous locations.")
2268 (license license:gpl2+)))
23a22af6
AW		 2269
2270(define-public gnome-settings-daemon
2271 (package
2272 (name "gnome-settings-daemon")
2273 (version "3.16.0")
2274 (source
2275 (origin
2276 (method url-fetch)
2277 (uri (string-append "mirror://gnome/sources/" name "/"
2278 (version-major+minor version) "/"
2279 name "-" version ".tar.xz"))
2280 (sha256
2281 (base32
2282 "1w29x2izq59125ga5ncmmaklc8kw7x7rdn6swn26bs23mah1r1g3"))))
2283 (build-system glib-or-gtk-build-system)
2284 (arguments
ec2b1921 2285 `(;; Network manager not yet packaged.
23a22af6
AW		 2286 #:configure-flags '("--disable-network-manager")
2287 ;; Color management test can't reach the colord system service.
2288 #:tests? #f))
2289 (native-inputs
2290 `(("pkg-config" ,pkg-config)
2291 ("intltool" ,intltool)
2292 ("xsltproc" ,libxslt)
2293 ("libxml2" ,libxml2) ;for XML_CATALOG_FILES
2294 ("docbook-xml" ,docbook-xml-4.2)
2295 ("docbook-xsl" ,docbook-xsl)))
2296 (inputs
2297 `(("colord" ,colord)
2298 ("eudev" ,eudev)
2299 ("upower" ,upower)
2300 ("polkit" ,polkit)
2301 ("pulseaudio" ,pulseaudio)
2302 ("libcanberra" ,libcanberra)
2303 ("libx11" ,libx11)
2304 ("libxtst" ,libxtst)
2305 ("lcms" ,lcms)
2306 ("libnotify" ,libnotify)
2307 ("geoclue" ,geoclue)
2308 ("geocode-glib" ,geocode-glib)
2309 ("libgweather" ,libgweather)
2310 ("gnome-desktop" ,gnome-desktop)
2311 ("nss" ,nss)
2312 ("cups" ,cups)
ec2b1921
AW		 2313 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
2314 ("libwacom" ,libwacom)
2315 ("librsvg" ,librsvg)
2316 ("xf86-input-wacom" ,xf86-input-wacom)))
23a22af6
AW		 2317 (home-page "http://www.gnome.org")
2318 (synopsis "GNOME settings daemon")
2319 (description
2320 "This package contains the daemon responsible for setting the various
2321parameters of a GNOME session and the applications that run under it. It
2322handles settings such keyboard layout, shortcuts, and accessibility, clipboard
2323settings, themes, mouse settings, and startup of other daemons.")
2324 (license license:gpl2+)))
1e7464a9
DH		 2325
2326(define-public totem-pl-parser
2327 (package
2328 (name "totem-pl-parser")
2329 (version "3.10.5")
2330 (source (origin
2331 (method url-fetch)
2332 (uri (string-append "mirror://gnome/sources/totem-pl-parser/3.10/"
2333 "totem-pl-parser-" version ".tar.xz"))
2334 (sha256
2335 (base32
2336 "0dw1kiwmjwdjrighri0j9nagsnj44dllm0mamnfh4y5nc47mhim7"))))
2337 (build-system gnu-build-system)
2338 (arguments
2339 ;; FIXME: Tests require gvfs.
2340 `(#:tests? #f))
2341 (native-inputs
2342 `(("intltool" ,intltool)
2343 ("glib" ,glib "bin")
2344 ("pkg-config" ,pkg-config)))
2345 (inputs
2346 `(("glib" ,glib)
2347 ("gmime" ,gmime)
2348 ("libarchive" ,libarchive)
2349 ("libgcrypt" ,libgcrypt)
2350 ("nettle" ,nettle)
2351 ("libsoup" ,libsoup)
2352 ("libxml2" ,libxml2)))
2353 (home-page "https://projects.gnome.org/totem")
2354 (synopsis "Library to parse and save media playlists for GNOME")
2355 (description "Totem-pl-parser is a GObjects-based library to parse and save
2356playlists in a variety of formats.")
2357 (license license:lgpl2.0+)))
2358
6b888eff
SB		 2359(define-public aisleriot
2360 (package
2361 (name "aisleriot")
2362 (version "3.16.1")
2363 (source (origin
2364 (method url-fetch)
2365 (uri (string-append "mirror://gnome/sources/" name "/"
2366 (version-major+minor version) "/"
2367 name "-" version ".tar.xz"))
2368 (sha256
2369 (base32
2370 "19k483x9dkq8vjbq8f333pk9qil64clpsfg20q8xk9bgmk38aj8h"))))
2371 (build-system glib-or-gtk-build-system)
2372 (arguments
2373 '(#:configure-flags
2374 '("--with-platform=gtk-only"
2375 "--with-card-theme-formats=svg")))
2376 (native-inputs
2377 `(("desktop-file-utils" ,desktop-file-utils)
2378 ("glib:bin" ,glib "bin") ; for glib-compile-schemas, etc.
2379 ("intltool" ,intltool)
2380 ("itstool" ,itstool)
2381 ("pkg-config" ,pkg-config)
2382 ("xmllint" ,libxml2)))
2383 (inputs
2384 `(("gtk+" ,gtk+)
2385 ("guile" ,guile-2.0)
2386 ("libcanberra" ,libcanberra)
2387 ("librsvg" ,librsvg)))
2388 (home-page "https://wiki.gnome.org/Apps/Aisleriot")
2389 (synopsis "Solitaire card games")
2390 (description
2391 "Aisleriot (also known as Solitaire or sol) is a collection of card games
2392which are easy to play with the aid of a mouse.")
2393 (license license:gpl3+)))
jackhill's copy of GNU Guix: https://guix.gnu.org/