| blob | f234d2c86021d25f3ee8805802543677e5e34cce |
1 ;;; GNU Guix --- Functional package management for GNU
2 ;;; Copyright © 2016 Fabian Harfert <fhmgufs@web.de>
3 ;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
4 ;;; Copyright © 2017 ng0 <ng0@n0.is>
5 ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
6 ;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org>
7 ;;; Copyright © 2019 Guy Fleury Iteriteka <hoonandon@gmail.com>
8 ;;;
9 ;;; This file is part of GNU Guix.
10 ;;;
11 ;;; GNU Guix is free software; you can redistribute it and/or modify it
12 ;;; under the terms of the GNU General Public License as published by
13 ;;; the Free Software Foundation; either version 3 of the License, or (at
14 ;;; your option) any later version.
15 ;;;
16 ;;; GNU Guix is distributed in the hope that it will be useful, but
17 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
18 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 ;;; GNU General Public License for more details.
20 ;;;
21 ;;; You should have received a copy of the GNU General Public License
22 ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
24 (define-module (gnu packages mate)
25 #:use-module ((guix licenses) #:prefix license:)
26 #:use-module (guix packages)
27 #:use-module (guix download)
28 #:use-module (guix utils)
29 #:use-module (guix build-system gnu)
30 #:use-module (guix build-system glib-or-gtk)
31 #:use-module (guix build-system trivial)
32 #:use-module (gnu packages)
33 #:use-module (gnu packages attr)
34 #:use-module (gnu packages autotools)
35 #:use-module (gnu packages backup)
36 #:use-module (gnu packages base)
37 #:use-module (gnu packages compression)
38 #:use-module (gnu packages djvu)
39 #:use-module (gnu packages docbook)
40 #:use-module (gnu packages documentation)
41 #:use-module (gnu packages enchant)
42 #:use-module (gnu packages file)
43 #:use-module (gnu packages fonts)
44 #:use-module (gnu packages fontutils)
45 #:use-module (gnu packages freedesktop)
46 #:use-module (gnu packages gettext)
47 #:use-module (gnu packages ghostscript)
48 #:use-module (gnu packages glib)
49 #:use-module (gnu packages gnome)
50 #:use-module (gnu packages gnupg)
51 #:use-module (gnu packages gtk)
52 #:use-module (gnu packages image)
53 #:use-module (gnu packages imagemagick)
54 #:use-module (gnu packages iso-codes)
55 #:use-module (gnu packages javascript)
56 #:use-module (gnu packages libcanberra)
57 #:use-module (gnu packages linux)
58 #:use-module (gnu packages messaging)
59 #:use-module (gnu packages nettle)
60 #:use-module (gnu packages nss)
61 #:use-module (gnu packages pkg-config)
62 #:use-module (gnu packages pdf)
63 #:use-module (gnu packages photo)
64 #:use-module (gnu packages polkit)
65 #:use-module (gnu packages pulseaudio)
66 #:use-module (gnu packages python)
67 #:use-module (gnu packages python-xyz)
68 #:use-module (gnu packages tex)
69 #:use-module (gnu packages webkit)
70 #:use-module (gnu packages xdisorg)
71 #:use-module (gnu packages xml)
72 #:use-module (gnu packages xdisorg)
73 #:use-module (gnu packages xorg))
75 (define-public mate-common
76 (package
77 (name "mate-common")
78 (version "1.22.0")
79 (source
80 (origin
81 (method url-fetch)
82 (uri (string-append "https://pub.mate-desktop.org/releases/"
83 (version-major+minor version) "/"
84 name "-" version ".tar.xz"))
85 (sha256
86 (base32
87 "11lwckndizawbq993ws8lqp59vsc873zri0m8s1i5zyc4qx9f69z"))))
88 (build-system gnu-build-system)
89 (home-page "https://mate-desktop.org/")
90 (synopsis "Common files for development of MATE packages")
91 (description
92 "Mate Common includes common files and macros used by
93 MATE applications.")
94 (license license:gpl3+)))
96 (define-public mate-power-manager
97 (package
98 (name "mate-power-manager")
99 (version "1.22.0")
100 (source
101 (origin
102 (method url-fetch)
103 (uri (string-append "mirror://mate/" (version-major+minor version) "/"
104 name "-" version ".tar.xz"))
105 (sha256
106 (base32
107 "03c09h41qfz83wmjfvwzkq4xqc54aswmki4h034qcxbgfnyfmk1i"))))
108 (build-system gnu-build-system)
109 (native-inputs
110 `(("pkg-config" ,pkg-config)
111 ("intltool" ,intltool)
112 ("yelp-tools" ,yelp-tools)
113 ("glib" ,glib "bin") ; glib-gettextize
114 ("libtool" ,libtool)))
115 (inputs
116 `(("gtk+" ,gtk+)
117 ("glib" ,glib)
118 ("dbus-glib" ,dbus-glib)
119 ("libgnome-keyring" ,libgnome-keyring)
120 ("cairo" ,cairo)
121 ("dbus" ,dbus)
122 ("libnotify" ,libnotify)
123 ("mate-panel" ,mate-panel)
124 ("libxrandr" ,libxrandr)
125 ("libcanberra" ,libcanberra)
126 ("upower" ,upower)))
127 (home-page "https://mate-desktop.org/")
128 (synopsis "Power manager for MATE")
129 (description
130 "MATE Power Manager is a MATE session daemon that acts as a policy agent on
131 top of UPower. It listens to system events and responds with user-configurable
132 actions.")
133 (license license:gpl2+)))
135 (define-public mate-icon-theme
136 (package
137 (name "mate-icon-theme")
138 (version "1.22.0")
139 (source (origin
140 (method url-fetch)
141 (uri (string-append "https://pub.mate-desktop.org/releases/"
142 (version-major+minor version) "/"
143 name "-" version ".tar.xz"))
144 (sha256
145 (base32
146 "090vfxpn1b1wwvkilv1j3cx4swdm4z0s7xyvhvqhdzj58zsf2000"))))
147 (build-system gnu-build-system)
148 (native-inputs
149 `(("pkg-config" ,pkg-config)
150 ("intltool" ,intltool)
151 ("icon-naming-utils" ,icon-naming-utils)))
152 (home-page "https://mate-desktop.org/")
153 (synopsis "The MATE desktop environment icon theme")
154 (description
155 "This package contains the default icon theme used by the MATE desktop.")
156 (license license:lgpl3+)))
158 (define-public mate-icon-theme-faenza
159 (package
160 (name "mate-icon-theme-faenza")
161 (version "1.20.0")
162 (source (origin
163 (method url-fetch)
164 (uri (string-append "https://pub.mate-desktop.org/releases/"
165 (version-major+minor version) "/"
166 name "-" version ".tar.xz"))
167 (sha256
168 (base32
169 "000vr9cnbl2qlysf2gyg1lsjirqdzmwrnh6d3hyrsfc0r2vh4wna"))))
170 (build-system gnu-build-system)
171 (arguments
172 `(#:phases
173 (modify-phases %standard-phases
174 (add-after 'unpack 'autoconf
175 (lambda _
176 (setenv "SHELL" (which "sh"))
177 (setenv "CONFIG_SHELL" (which "sh"))
178 (invoke "sh" "autogen.sh"))))))
179 (native-inputs
180 `(("autoconf" ,autoconf-wrapper)
181 ("automake" ,automake)
182 ("intltool" ,intltool)
183 ("icon-naming-utils" ,icon-naming-utils)
184 ("libtool" ,libtool)
185 ("mate-common" ,mate-common)
186 ("pkg-config" ,pkg-config)
187 ("which" ,which)))
188 (home-page "https://mate-desktop.org/")
189 (synopsis "MATE desktop environment icon theme faenza")
190 (description
191 "Icon theme using Faenza and Faience icon themes and some
192 customized icons for MATE. Furthermore it includes some icons
193 from Mint-X-F and Faenza-Fresh icon packs.")
194 (license license:gpl2+)))
196 (define-public mate-themes
197 (package
198 (name "mate-themes")
199 (version "3.22.19")
200 (source (origin
201 (method url-fetch)
202 (uri (string-append "https://pub.mate-desktop.org/releases/themes/"
203 (version-major+minor version) "/mate-themes-"
204 version ".tar.xz"))
205 (sha256
206 (base32
207 "1ycb8b8r0s8d1h1477135mynr53s5781gdb2ap8xlvj2g58492wq"))))
208 (build-system gnu-build-system)
209 (native-inputs
210 `(("pkg-config" ,pkg-config)
211 ("intltool" ,intltool)
212 ("gdk-pixbuf" ,gdk-pixbuf) ; gdk-pixbuf+svg isn't needed
213 ("gtk" ,gtk+-2)))
214 (home-page "https://mate-desktop.org/")
215 (synopsis
216 "Official themes for the MATE desktop")
217 (description
218 "This package includes the standard themes for the MATE desktop, for
219 example Menta, TraditionalOk, GreenLaguna or BlackMate. This package has
220 themes for both gtk+-2 and gtk+-3.")
221 (license (list license:lgpl2.1+ license:cc-by-sa3.0 license:gpl3+
222 license:gpl2+))))
224 (define-public mate-desktop
225 (package
226 (name "mate-desktop")
227 (version "1.22.0")
228 (source (origin
229 (method url-fetch)
230 (uri (string-append "https://pub.mate-desktop.org/releases/"
231 (version-major+minor version) "/"
232 name "-" version ".tar.xz"))
233 (sha256
234 (base32
235 "09gn840p6qds21kxab4pidjd53g76s76i7178fdibrz462mda217"))))
236 (build-system gnu-build-system)
237 (native-inputs
238 `(("pkg-config" ,pkg-config)
239 ("intltool" ,intltool)
240 ("glib:bin" ,glib "bin")
241 ("gobject-introspection" ,gobject-introspection)
242 ("yelp-tools" ,yelp-tools)
243 ("gtk-doc" ,gtk-doc)))
244 (inputs
245 `(("gtk+" ,gtk+)
246 ("libxrandr" ,libxrandr)
247 ("iso-codes" ,iso-codes)
248 ("startup-notification" ,startup-notification)))
249 (propagated-inputs
250 `(("dconf" ,dconf))) ; mate-desktop-2.0.pc
251 (home-page "https://mate-desktop.org/")
252 (synopsis "Library with common API for various MATE modules")
253 (description
254 "This package contains a public API shared by several applications on the
255 desktop and the mate-about program.")
256 (license (list license:gpl2+ license:lgpl2.0+ license:fdl1.1+))))
258 (define-public libmateweather
259 (package
260 (name "libmateweather")
261 (version "1.22.0")
262 (source (origin
263 (method url-fetch)
264 (uri (string-append "https://pub.mate-desktop.org/releases/"
265 (version-major+minor version) "/"
266 name "-" version ".tar.xz"))
267 (sha256
268 (base32
269 "1ribgcwl4ncfbcf9bkcbxrgc7yzajdnxg12837psngymkqswlp6a"))))
270 (build-system gnu-build-system)
271 (arguments
272 '(#:configure-flags
273 (list (string-append "--with-zoneinfo-dir="
274 (assoc-ref %build-inputs "tzdata")
275 "/share/zoneinfo"))
276 #:phases
277 (modify-phases %standard-phases
278 (add-before 'check 'fix-tzdata-location
279 (lambda* (#:key inputs #:allow-other-keys)
280 (substitute* "data/check-timezones.sh"
281 (("/usr/share/zoneinfo/zone.tab")
282 (string-append (assoc-ref inputs "tzdata")
283 "/share/zoneinfo/zone.tab")))
284 #t)))))
285 (native-inputs
286 `(("pkg-config" ,pkg-config)
287 ("intltool" ,intltool)
288 ("dconf" ,dconf)
289 ("glib:bin" ,glib "bin")))
290 (inputs
291 `(("gtk+" ,gtk+)
292 ("tzdata" ,tzdata)))
293 (propagated-inputs
294 ;; both of these are requires.private in mateweather.pc
295 `(("libsoup" ,libsoup)
296 ("libxml2" ,libxml2)))
297 (home-page "https://mate-desktop.org/")
298 (synopsis "MATE library for weather information from the Internet")
299 (description
300 "This library provides access to weather information from the internet for
301 the MATE desktop environment.")
302 (license license:lgpl2.1+)))
304 (define-public mate-terminal
305 (package
306 (name "mate-terminal")
307 (version "1.22.0")
308 (source
309 (origin
310 (method url-fetch)
311 (uri (string-append "https://pub.mate-desktop.org/releases/"
312 (version-major+minor version) "/"
313 name "-" version ".tar.xz"))
314 (sha256
315 (base32
316 "16r492s34la2fs2cj1xr0r93wkjglwy77jyrc66i2ahs9gnivj4g"))))
317 (build-system glib-or-gtk-build-system)
318 (native-inputs
319 `(("pkg-config" ,pkg-config)
320 ("intltool" ,intltool)
321 ("itstool" ,itstool)
322 ("gobject-introspection" ,gobject-introspection)
323 ("libxml2" ,libxml2)
324 ("yelp-tools" ,yelp-tools)))
325 (inputs
326 `(("dconf" ,dconf)
327 ("gtk+" ,gtk+)
328 ("libice" ,libice)
329 ("libsm" ,libsm)
330 ("libx11" ,libx11)
331 ("mate-desktop" ,mate-desktop)
332 ("pango" ,pango)
333 ("vte" ,vte)))
334 (home-page "https://mate-desktop.org/")
335 (synopsis "MATE Terminal Emulator")
336 (description
337 "MATE Terminal is a terminal emulation application that you can
338 use to access a shell. With it, you can run any application that
339 is designed to run on VT102, VT220, and xterm terminals.
340 MATE Terminal also has the ability to use multiple terminals
341 in a single window (tabs) and supports management of different
342 configurations (profiles).")
343 (license license:gpl3)))
345 (define-public mate-session-manager
346 (package
347 (name "mate-session-manager")
348 (version "1.22.0")
349 (source
350 (origin
351 (method url-fetch)
352 (uri (string-append "https://pub.mate-desktop.org/releases/"
353 (version-major+minor version) "/"
354 name "-" version ".tar.xz"))
355 (sha256
356 (base32
357 "1kpfmgay01gm74paaxccs3lim4jfb4hsm7i85jfdypr51985pwyj"))))
358 (build-system glib-or-gtk-build-system)
359 (arguments
360 `(#:configure-flags (list "--enable-elogind"
361 "--disable-schemas-compile")
362 #:phases
363 (modify-phases %standard-phases
364 (add-before 'configure 'pre-configure
365 (lambda* (#:key outputs #:allow-other-keys)
366 ;; Use elogind instead of systemd.
367 (substitute* "configure"
368 (("libsystemd-login")
369 "libelogind")
370 (("systemd") "elogind"))
371 (substitute* "mate-session/gsm-systemd.c"
372 (("#include <systemd/sd-login.h>")
373 "#include <elogind/sd-login.h>"))
374 ;; Remove uses of the systemd journal.
375 (substitute* "mate-session/main.c"
376 (("#ifdef HAVE_SYSTEMD") "#if 0"))
377 (substitute* "mate-session/gsm-manager.c"
378 (("#ifdef HAVE_SYSTEMD") "#if 0"))
379 (substitute* "mate-session/gsm-autostart-app.c"
380 (("#ifdef HAVE_SYSTEMD") "#if 0"))
381 #t))
382 (add-after 'install 'update-xsession-dot-desktop
383 (lambda* (#:key outputs #:allow-other-keys)
384 ;; Record the absolute file name of 'mate-session' in the
385 ;; '.desktop' file.
386 (let* ((out (assoc-ref outputs "out"))
387 (xsession (string-append
388 out "/share/xsessions/mate.desktop")))
389 (substitute* xsession
390 (("^Exec=.*$")
391 (string-append "Exec=" out "/bin/mate-session\n"))
392 (("^TryExec=.*$")
393 (string-append "Exec=" out "/bin/mate-session\n")))
394 #t))))))
395 (native-inputs
396 `(("pkg-config" ,pkg-config)
397 ("intltool" ,intltool)
398 ("xtrans" ,xtrans)
399 ("gobject-introspection" ,gobject-introspection)))
400 (inputs
401 `(("gtk+" ,gtk+)
402 ("dbus-glib" ,dbus-glib)
403 ("elogind" ,elogind)
404 ("libsm" ,libsm)
405 ("mate-desktop" ,mate-desktop)))
406 (home-page "https://mate-desktop.org/")
407 (synopsis "Session manager for MATE")
408 (description
409 "Mate-session contains the MATE session manager, as well as a
410 configuration program to choose applications starting on login.")
411 (license license:gpl2)))
413 (define-public mate-settings-daemon
414 (package
415 (name "mate-settings-daemon")
416 (version "1.22.0")
417 (source
418 (origin
419 (method url-fetch)
420 (uri (string-append "https://pub.mate-desktop.org/releases/"
421 (version-major+minor version) "/"
422 name "-" version ".tar.xz"))
423 (sha256
424 (base32
425 "0yr5v6b9hdk20j29smbw1k4fkyg82i5vlflmgly0vi5whgc74gym"))))
426 (build-system glib-or-gtk-build-system)
427 (native-inputs
428 `(("pkg-config" ,pkg-config)
429 ("intltool" ,intltool)
430 ("gobject-introspection" ,gobject-introspection)))
431 (inputs
432 `(("cairo" ,cairo)
433 ("dbus" ,dbus)
434 ("dbus-glib" ,dbus-glib)
435 ("dconf" ,dconf)
436 ("fontconfig" ,fontconfig)
437 ("gtk+" ,gtk+)
438 ("libcanberra" ,libcanberra)
439 ("libmatekbd" ,libmatekbd)
440 ("libmatemixer" ,libmatemixer)
441 ("libnotify" ,libnotify)
442 ("libx11" ,libx11)
443 ("libxext" ,libxext)
444 ("libxi" ,libxi)
445 ("libxklavier" ,libxklavier)
446 ("mate-desktop" ,mate-desktop)
447 ("nss" ,nss)
448 ("polkit" ,polkit)
449 ("startup-notification" ,startup-notification)))
450 (home-page "https://mate-desktop.org/")
451 (synopsis "Settings Daemon for MATE")
452 (description
453 "Mate-settings-daemon is a fork of gnome-settings-daemon.")
454 (license (list license:lgpl2.1 license:gpl2))))
456 (define-public libmatemixer
457 (package
458 (name "libmatemixer")
459 (version "1.22.0")
460 (source
461 (origin
462 (method url-fetch)
463 (uri (string-append "https://pub.mate-desktop.org/releases/"
464 (version-major+minor version) "/"
465 name "-" version ".tar.xz"))
466 (sha256
467 (base32
468 "1v0gpr55gj4mj8hzxbhgzrmhaxvs2inxhsmirvjw39sc7iplvrh9"))))
469 (build-system glib-or-gtk-build-system)
470 (native-inputs
471 `(("pkg-config" ,pkg-config)
472 ("intltool" ,intltool)
473 ("gobject-introspection" ,gobject-introspection)))
474 (inputs
475 `(("glib" ,glib)
476 ("pulseaudio" ,pulseaudio)
477 ("alsa-lib" ,alsa-lib)))
478 (home-page "https://mate-desktop.org/")
479 (synopsis "Mixer library for the MATE desktop")
480 (description
481 "Libmatemixer is a mixer library for MATE desktop. It provides an abstract
482 API allowing access to mixer functionality available in the PulseAudio and ALSA
483 sound systems.")
484 (license license:lgpl2.1)))
486 (define-public libmatekbd
487 (package
488 (name "libmatekbd")
489 (version "1.22.0")
490 (source
491 (origin
492 (method url-fetch)
493 (uri (string-append "https://pub.mate-desktop.org/releases/"
494 (version-major+minor version) "/"
495 name "-" version ".tar.xz"))
496 (sha256
497 (base32
498 "1dsr7618c92mhwabwhgxqsfp7gnf9zrz2z790jc5g085dxhg13y8"))))
499 (build-system glib-or-gtk-build-system)
500 (native-inputs
501 `(("pkg-config" ,pkg-config)
502 ("intltool" ,intltool)
503 ("gobject-introspection" ,gobject-introspection)))
504 (inputs
505 `(("cairo" ,cairo)
506 ("gdk-pixbuf" ,gdk-pixbuf+svg)
507 ("glib" ,glib)
508 ("gtk+" ,gtk+)
509 ("libx11" ,libx11)
510 ("libxklavier" ,libxklavier)))
511 (home-page "https://mate-desktop.org/")
512 (synopsis "MATE keyboard configuration library")
513 (description
514 "Libmatekbd is a keyboard configuration library for the
515 MATE desktop environment.")
516 (license license:lgpl2.1)))
518 (define-public mate-menus
519 (package
520 (name "mate-menus")
521 (version "1.22.0")
522 (source (origin
523 (method url-fetch)
524 (uri (string-append "https://pub.mate-desktop.org/releases/"
525 (version-major+minor version) "/"
526 name "-" version ".tar.xz"))
527 (sha256
528 (base32
529 "1lkakbf2f1815c146z4xp5f0h4lim6jzr02681wbvzalc6k97v5c"))))
530 (build-system gnu-build-system)
531 (arguments
532 `(#:phases
533 (modify-phases %standard-phases
534 (add-after
535 'unpack 'fix-introspection-install-dir
536 (lambda* (#:key outputs #:allow-other-keys)
537 (let ((out (assoc-ref outputs "out")))
538 (substitute* '("configure")
539 (("`\\$PKG_CONFIG --variable=girdir gobject-introspection-1.0`")
540 (string-append "\"" out "/share/gir-1.0/\""))
541 (("\\$\\(\\$PKG_CONFIG --variable=typelibdir gobject-introspection-1.0\\)")
542 (string-append out "/lib/girepository-1.0/")))
543 #t))))))
544 (native-inputs
545 `(("pkg-config" ,pkg-config)
546 ("intltool" ,intltool)
547 ("gobject-introspection" ,gobject-introspection)))
548 (inputs
549 `(("glib" ,glib)
550 ("python" ,python-2)))
551 (home-page "https://mate-desktop.org/")
552 (synopsis "Freedesktop menu specification implementation for MATE")
553 (description
554 "The package contains an implementation of the freedesktop menu
555 specification, the MATE menu layout configuration files, .directory files and
556 assorted menu related utility programs.")
557 (license (list license:gpl2+ license:lgpl2.0+))))
559 (define-public mate-applets
560 (package
561 (name "mate-applets")
562 (version "1.22.0")
563 (source
564 (origin
565 (method url-fetch)
566 (uri (string-append "https://pub.mate-desktop.org/releases/"
567 (version-major+minor version) "/"
568 name "-" version ".tar.xz"))
569 (sha256
570 (base32
571 "0f5ym6z7awi0kw6i1sdkj2qly88sl692j5r1zhklihyz1z9a6j0h"))))
572 (build-system glib-or-gtk-build-system)
573 (native-inputs
574 `(("pkg-config" ,pkg-config)
575 ("intltool" ,intltool)
576 ("libxslt" ,libxslt)
577 ("yelp-tools" ,yelp-tools)
578 ("scrollkeeper" ,scrollkeeper)
579 ("gettext" ,gettext-minimal)
580 ("docbook-xml" ,docbook-xml)
581 ("gobject-introspection" ,gobject-introspection)))
582 (inputs
583 `(("atk" ,atk)
584 ("dbus" ,dbus)
585 ("dbus-glib" ,dbus-glib)
586 ("glib" ,glib)
587 ("gucharmap" ,gucharmap)
588 ("gtk+" ,gtk+)
589 ("gtksourceview" ,gtksourceview-3)
590 ("libgtop" ,libgtop)
591 ("libmateweather" ,libmateweather)
592 ("libnotify" ,libnotify)
593 ("libx11" ,libx11)
594 ("libxml2" ,libxml2)
595 ("libwnck" ,libwnck)
596 ("mate-panel" ,mate-panel)
597 ("pango" ,pango)
598 ("polkit" ,polkit) ; either polkit or setuid
599 ("python" ,python-2)
600 ("upower" ,upower)
601 ("wireless-tools" ,wireless-tools)))
602 (propagated-inputs
603 `(("python-pygobject" ,python-pygobject)))
604 (home-page "https://mate-desktop.org/")
605 (synopsis "Various applets for the MATE Panel")
606 (description
607 "Mate-applets includes various small applications for Mate-panel:
609 @enumerate
610 @item accessx-status: indicates keyboard accessibility settings,
611 including the current state of the keyboard, if those features are in use.
612 @item Battstat: monitors the power subsystem on a laptop.
613 @item Character palette: provides a convenient way to access
614 non-standard characters, such as accented characters,
615 mathematical symbols, special symbols, and punctuation marks.
616 @item MATE CPUFreq Applet: CPU frequency scaling monitor
617 @item Drivemount: lets you mount and unmount drives and file systems.
618 @item Geyes: pair of eyes which follow the mouse pointer around the screen.
619 @item Keyboard layout switcher: lets you assign different keyboard
620 layouts for different locales.
621 @item Modem Monitor: monitors the modem.
622 @item Invest: downloads current stock quotes from the Internet and
623 displays the quotes in a scrolling display in the applet. The
624 applet downloads the stock information from Yahoo! Finance.
625 @item System monitor: CPU, memory, network, swap file and resource.
626 @item Trash: lets you drag items to the trash folder.
627 @item Weather report: downloads weather information from the
628 U.S National Weather Service (NWS) servers, including the
629 Interactive Weather Information Network (IWIN).
630 @end enumerate\n")
631 (license (list license:gpl2+ license:lgpl2.0+ license:gpl3+))))
633 (define-public mate-media
634 (package
635 (name "mate-media")
636 (version "1.22.0")
637 (source
638 (origin
639 (method url-fetch)
640 (uri (string-append "https://pub.mate-desktop.org/releases/"
641 (version-major+minor version) "/"
642 name "-" version ".tar.xz"))
643 (sha256
644 (base32
645 "0jrxbz00vjas0yp3ixvyzfsdby2ac3p3bds9yd7q1437mmhf71mj"))))
646 (build-system glib-or-gtk-build-system)
647 (native-inputs
648 `(("pkg-config" ,pkg-config)
649 ("intltool" ,intltool)
650 ("gettext" ,gettext-minimal)
651 ("gobject-introspection" ,gobject-introspection)))
652 (inputs
653 `(("cairo" ,cairo)
654 ("gtk+" ,gtk+)
655 ("libcanberra" ,libcanberra)
656 ("libmatemixer" ,libmatemixer)
657 ("libxml2" ,libxml2)
658 ("mate-applets" ,mate-applets)
659 ("mate-desktop" ,mate-desktop)
660 ("mate-panel" ,mate-panel)
661 ("pango" ,pango)
662 ("startup-notification" ,startup-notification)))
663 (home-page "https://mate-desktop.org/")
664 (synopsis "Multimedia related programs for the MATE desktop")
665 (description
666 "Mate-media includes the MATE media tools for MATE, including
667 mate-volume-control, a MATE volume control application and applet.")
668 (license (list license:gpl2+ license:lgpl2.0+ license:fdl1.1+))))
670 (define-public mate-panel
671 (package
672 (name "mate-panel")
673 (version "1.22.0")
674 (source
675 (origin
676 (method url-fetch)
677 (uri (string-append "https://pub.mate-desktop.org/releases/"
678 (version-major+minor version) "/"
679 name "-" version ".tar.xz"))
680 (sha256
681 (base32
682 "17l4ryy71bkszr6shm9dm31zcsd7m0digi1mmvdlib5hqzvc7li7"))))
683 (build-system glib-or-gtk-build-system)
684 (arguments
685 `(#:configure-flags
686 (list (string-append "--with-zoneinfo-dir="
687 (assoc-ref %build-inputs "tzdata")
688 "/share/zoneinfo")
689 "--with-in-process-applets=all")
690 #:phases
691 (modify-phases %standard-phases
692 (add-before 'configure 'fix-timezone-path
693 (lambda* (#:key inputs #:allow-other-keys)
694 (let* ((tzdata (assoc-ref inputs "tzdata")))
695 (substitute* "applets/clock/system-timezone.h"
696 (("/usr/share/lib/zoneinfo/tab")
697 (string-append tzdata "/share/zoneinfo/zone.tab"))
698 (("/usr/share/zoneinfo")
699 (string-append tzdata "/share/zoneinfo"))))
700 #t))
701 (add-after 'unpack 'fix-introspection-install-dir
702 (lambda* (#:key outputs #:allow-other-keys)
703 (let ((out (assoc-ref outputs "out")))
704 (substitute* '("configure")
705 (("`\\$PKG_CONFIG --variable=girdir gobject-introspection-1.0`")
706 (string-append "\"" out "/share/gir-1.0/\""))
707 (("\\$\\(\\$PKG_CONFIG --variable=typelibdir gobject-introspection-1.0\\)")
708 (string-append out "/lib/girepository-1.0/")))
709 #t))))))
710 (native-inputs
711 `(("pkg-config" ,pkg-config)
712 ("intltool" ,intltool)
713 ("itstool" ,itstool)
714 ("xtrans" ,xtrans)
715 ("gobject-introspection" ,gobject-introspection)))
716 (inputs
717 `(("dconf" ,dconf)
718 ("cairo" ,cairo)
719 ("dbus-glib" ,dbus-glib)
720 ("gtk+" ,gtk+)
721 ("libcanberra" ,libcanberra)
722 ("libice" ,libice)
723 ("libmateweather" ,libmateweather)
724 ("librsvg" ,librsvg)
725 ("libsm" ,libsm)
726 ("libx11" ,libx11)
727 ("libxau" ,libxau)
728 ("libxml2" ,libxml2)
729 ("libxrandr" ,libxrandr)
730 ("libwnck" ,libwnck)
731 ("mate-desktop" ,mate-desktop)
732 ("mate-menus" ,mate-menus)
733 ("pango" ,pango)
734 ("tzdata" ,tzdata)))
735 (home-page "https://mate-desktop.org/")
736 (synopsis "Panel for MATE")
737 (description
738 "Mate-panel contains the MATE panel, the libmate-panel-applet library and
739 several applets. The applets supplied here include the Workspace Switcher,
740 the Window List, the Window Selector, the Notification Area, the Clock and the
741 infamous 'Wanda the Fish'.")
742 (license (list license:gpl2+ license:lgpl2.0+))))
744 (define-public atril
745 (package
746 (name "atril")
747 (version "1.22.0")
748 (source
749 (origin
750 (method url-fetch)
751 (uri (string-append "https://pub.mate-desktop.org/releases/"
752 (version-major+minor version) "/"
753 name "-" version ".tar.xz"))
754 (sha256
755 (base32
756 "1xd49j4qwrlg2nh2zvspf91yk033dp8a58dy9azqg2yz4bcvywxb"))))
757 (build-system glib-or-gtk-build-system)
758 (arguments
759 `(#:configure-flags (list (string-append "--with-openjpeg="
760 (assoc-ref %build-inputs "openjpeg"))
761 "--enable-introspection"
762 "--disable-schemas-compile"
763 ;; FIXME: Enable build of Caja extensions.
764 "--disable-caja")
765 #:tests? #f
766 #:phases
767 (modify-phases %standard-phases
768 (add-after 'unpack 'fix-mathjax-path
769 (lambda _
770 (let* ((mathjax (assoc-ref %build-inputs "js-mathjax"))
771 (mathjax-path (string-append mathjax
772 "/share/javascript/mathjax")))
773 (substitute* "backend/epub/epub-document.c"
774 (("/usr/share/javascript/mathjax")
775 mathjax-path)))
776 #t))
777 (add-after 'unpack 'fix-introspection-install-dir
778 (lambda* (#:key outputs #:allow-other-keys)
779 (let ((out (assoc-ref outputs "out")))
780 (substitute* '("configure")
781 (("\\$\\(\\$PKG_CONFIG --variable=girdir gobject-introspection-1.0\\)")
782 (string-append "\"" out "/share/gir-1.0/\""))
783 (("\\$\\(\\$PKG_CONFIG --variable=typelibdir gobject-introspection-1.0\\)")
784 (string-append out "/lib/girepository-1.0/")))
785 #t)))
786 (add-before 'install 'skip-gtk-update-icon-cache
787 ;; Don't create 'icon-theme.cache'.
788 (lambda _
789 (substitute* "data/Makefile"
790 (("gtk-update-icon-cache") "true"))
791 #t)))))
792 (native-inputs
793 `(("pkg-config" ,pkg-config)
794 ("intltool" ,intltool)
795 ("itstool" ,itstool)
796 ("yelp-tools" ,yelp-tools)
797 ("glib:bin" ,glib "bin")
798 ("gobject-introspection" ,gobject-introspection)
799 ("gtk-doc" ,gtk-doc)
800 ("xmllint" ,libxml2)
801 ("zlib" ,zlib)))
802 (inputs
803 `(("atk" ,atk)
804 ("cairo" ,cairo)
805 ("caja" ,caja)
806 ("dconf" ,dconf)
807 ("dbus" ,dbus)
808 ("dbus-glib" ,dbus-glib)
809 ("djvulibre" ,djvulibre)
810 ("fontconfig" ,fontconfig)
811 ("freetype" ,freetype)
812 ("ghostscript" ,ghostscript)
813 ("glib" ,glib)
814 ("gtk+" ,gtk+)
815 ("js-mathjax" ,js-mathjax)
816 ("libcanberra" ,libcanberra)
817 ("libsecret" ,libsecret)
818 ("libspectre" ,libspectre)
819 ("libtiff" ,libtiff)
820 ("libx11" ,libx11)
821 ("libice" ,libice)
822 ("libsm" ,libsm)
823 ("libgxps" ,libgxps)
824 ("libjpeg" ,libjpeg)
825 ("libxml2" ,libxml2)
826 ("dogtail" ,python2-dogtail)
827 ("shared-mime-info" ,shared-mime-info)
828 ("gdk-pixbuf" ,gdk-pixbuf)
829 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
830 ("libgnome-keyring" ,libgnome-keyring)
831 ("libarchive" ,libarchive)
832 ("marco" ,marco)
833 ("nettle" ,nettle)
834 ("openjpeg" ,openjpeg-1)
835 ("pango" ,pango)
836 ;;("texlive" ,texlive)
837 ;; TODO:
838 ;; Build libkpathsea as a shared library for DVI support.
839 ;; ("libkpathsea" ,texlive-bin)
840 ("poppler" ,poppler)
841 ("webkitgtk" ,webkitgtk)))
842 (home-page "https://mate-desktop.org")
843 (synopsis "Document viewer for Mate")
844 (description
845 "Document viewer for Mate")
846 (license license:gpl2)))
848 (define-public caja
849 (package
850 (name "caja")
851 (version "1.22.0")
852 (source
853 (origin
854 (method url-fetch)
855 (uri (string-append "https://pub.mate-desktop.org/releases/"
856 (version-major+minor version) "/"
857 name "-" version ".tar.xz"))
858 (sha256
859 (base32
860 "14x9n9q7vip5zp4mdgccj1p1dm4xn429g0bjw2v8iz7zmjb7vcgl"))))
861 (build-system glib-or-gtk-build-system)
862 (arguments
863 `(#:configure-flags '("--disable-update-mimedb")
864 #:tests? #f ; tests fail even with display set
865 #:phases
866 (modify-phases %standard-phases
867 (add-before 'check 'pre-check
868 (lambda _
869 ;; Tests require a running X server.
870 (system "Xvfb :1 &")
871 (setenv "DISPLAY" ":1")
872 ;; For the missing /etc/machine-id.
873 (setenv "DBUS_FATAL_WARNINGS" "0")
874 #t)))))
875 (native-inputs
876 `(("pkg-config" ,pkg-config)
877 ("intltool" ,intltool)
878 ("glib:bin" ,glib "bin")
879 ("xorg-server" ,xorg-server)
880 ("gobject-introspection" ,gobject-introspection)))
881 (inputs
882 `(("exempi" ,exempi)
883 ("gtk+" ,gtk+)
884 ("gvfs" ,gvfs)
885 ("libexif" ,libexif)
886 ("libnotify" ,libnotify)
887 ("libsm" ,libsm)
888 ("libxml2" ,libxml2)
889 ("mate-desktop" ,mate-desktop)
890 ("startup-notification" ,startup-notification)))
891 (native-search-paths
892 (list (search-path-specification
893 (variable "CAJA_EXTENSIONDIR")
894 (files (list "lib/caja/extensions-2.0/**")))))
895 (home-page "https://mate-desktop.org/")
896 (synopsis "File manager for the MATE desktop")
897 (description
898 "Caja is the official file manager for the MATE desktop.
899 It allows for browsing directories, as well as previewing files and launching
900 applications associated with them. Caja is also responsible for handling the
901 icons on the MATE desktop. It works on local and remote file systems.")
902 ;; There is a note about a TRADEMARKS_NOTICE file in COPYING which
903 ;; does not exist. It is safe to assume that this is of no concern
904 ;; for us.
905 (license license:gpl2+)))
907 (define-public caja-extensions
908 (package
909 (name "caja-extensions")
910 (version "1.22.0")
911 (source
912 (origin
913 (method url-fetch)
914 (uri (string-append "https://pub.mate-desktop.org/releases/"
915 (version-major+minor version) "/"
916 name "-" version ".tar.xz"))
917 (sha256
918 (base32
919 "1h866jmdd3qpjzi7wjj11krwiaadnlf21844g1zqfb4jgrzj773p"))))
920 (build-system glib-or-gtk-build-system)
921 (arguments
922 `(#:configure-flags (list "--enable-sendto"
923 ;; TODO: package "gupnp" to enable 'upnp', package
924 ;; "gksu" to enable 'gksu'.
925 (string-append "--with-sendto-plugins=removable-devices,"
926 "caja-burn,emailclient,pidgin,gajim")
927 "--enable-image-converter"
928 "--enable-open-terminal" "--enable-share"
929 "--enable-wallpaper" "--enable-xattr-tags"
930 (string-append "--with-cajadir="
931 (assoc-ref %outputs "out")
932 "/lib/caja/extensions-2.0/"))))
933 (native-inputs
934 `(("intltool" ,intltool)
935 ("gettext" ,gettext-minimal)
936 ("glib:bin" ,glib "bin")
937 ("gobject-introspection" ,gobject-introspection)
938 ("gtk-doc" ,gtk-doc)
939 ("pkg-config" ,pkg-config)))
940 (inputs
941 `(("attr" ,attr)
942 ("brasero" ,brasero)
943 ("caja" ,caja)
944 ("dbus" ,dbus)
945 ("dbus-glib" ,dbus-glib)
946 ("gajim" ,gajim) ;runtime only?
947 ("gtk+" ,gtk+)
948 ("imagemagick" ,imagemagick)
949 ("graphicsmagick" ,graphicsmagick)
950 ("mate-desktop" ,mate-desktop)
951 ("pidgin" ,pidgin) ;runtime only?
952 ("startup-notification" ,startup-notification)))
953 (home-page "https://mate-desktop.org/")
954 (synopsis "Extensions for the File manager Caja")
955 (description
956 "Caja is the official file manager for the MATE desktop.
957 It allows for browsing directories, as well as previewing files and launching
958 applications associated with them. Caja is also responsible for handling the
959 icons on the MATE desktop. It works on local and remote file systems.")
960 (license license:gpl2+)))
962 (define-public mate-control-center
963 (package
964 (name "mate-control-center")
965 (version "1.22.0")
966 (source
967 (origin
968 (method url-fetch)
969 (uri (string-append "https://pub.mate-desktop.org/releases/"
970 (version-major+minor version) "/"
971 name "-" version ".tar.xz"))
972 (sha256
973 (base32
974 "06wpfsxsiv7w3dl7p395r5vcxqbjlllydqbnvbr6yn0lrac15i71"))))
975 (build-system glib-or-gtk-build-system)
976 (native-inputs
977 `(("pkg-config" ,pkg-config)
978 ("intltool" ,intltool)
979 ("yelp-tools" ,yelp-tools)
980 ("desktop-file-utils" ,desktop-file-utils)
981 ("xorgproto" ,xorgproto)
982 ("xmodmap" ,xmodmap)
983 ("gobject-introspection" ,gobject-introspection)))
984 (inputs
985 `(("atk" ,atk)
986 ("cairo" ,cairo)
987 ("caja" ,caja)
988 ("dconf" ,dconf)
989 ("dbus" ,dbus)
990 ("dbus-glib" ,dbus-glib)
991 ("fontconfig" ,fontconfig)
992 ("freetype" ,freetype)
993 ("glib" ,glib)
994 ("gtk+" ,gtk+)
995 ("libcanberra" ,libcanberra)
996 ("libmatekbd" ,libmatekbd)
997 ("libx11" ,libx11)
998 ("libxcursor" ,libxcursor)
999 ("libxext" ,libxext)
1000 ("libxi" ,libxi)
1001 ("libxklavier" ,libxklavier)
1002 ("libxml2" ,libxml2)
1003 ("libxrandr" ,libxrandr)
1004 ("libxrender" ,libxrender)
1005 ("libxscrnsaver" ,libxscrnsaver)
1006 ("marco" ,marco)
1007 ("mate-desktop" ,mate-desktop)
1008 ("mate-menus" ,mate-menus)
1009 ("mate-settings-daemon" ,mate-settings-daemon)
1010 ("pango" ,pango)
1011 ("startup-notification" ,startup-notification)))
1012 (propagated-inputs
1013 `(("gdk-pixbuf" ,gdk-pixbuf+svg) ; mate-slab.pc
1014 ("librsvg" ,librsvg))) ; mate-slab.pc
1015 (home-page "https://mate-desktop.org/")
1016 (synopsis "MATE Desktop configuration tool")
1017 (description
1018 "MATE control center is MATE's main interface for configuration
1019 of various aspects of your desktop.")
1020 (license license:gpl2+)))
1022 (define-public marco
1023 (package
1024 (name "marco")
1025 (version "1.22.0")
1026 (source
1027 (origin
1028 (method url-fetch)
1029 (uri (string-append "https://pub.mate-desktop.org/releases/"
1030 (version-major+minor version) "/"
1031 name "-" version ".tar.xz"))
1032 (sha256
1033 (base32
1034 "1i1pi1z9mrb6564mxcwb93jqpdppfv58c2viwmicsixis62hv5wx"))))
1035 (build-system glib-or-gtk-build-system)
1036 (native-inputs
1037 `(("pkg-config" ,pkg-config)
1038 ("intltool" ,intltool)
1039 ("itstool" ,itstool)
1040 ("glib" ,glib)
1041 ("gobject-introspection" ,gobject-introspection)
1042 ("libxft" ,libxft)
1043 ("libxml2" ,libxml2)
1044 ("zenity" ,zenity)))
1045 (inputs
1046 `(("gtk+" ,gtk+)
1047 ("libcanberra" ,libcanberra)
1048 ("libgtop" ,libgtop)
1049 ("libice" ,libice)
1050 ("libsm" ,libsm)
1051 ("libx11" ,libx11)
1052 ("libxcomposite" ,libxcomposite)
1053 ("libxcursor" ,libxcursor)
1054 ("libxdamage" ,libxdamage)
1055 ("libxext" ,libxext)
1056 ("libxfixes" ,libxfixes)
1057 ("libxinerama" ,libxinerama)
1058 ("libxrandr" ,libxrandr)
1059 ("libxrender" ,libxrender)
1060 ("mate-desktop" ,mate-desktop)
1061 ("pango" ,pango)
1062 ("startup-notification" ,startup-notification)))
1063 (home-page "https://mate-desktop.org/")
1064 (synopsis "Window manager for the MATE desktop")
1065 (description
1066 "Marco is a minimal X window manager that uses GTK+ for drawing
1067 window frames. It is aimed at non-technical users and is designed to integrate
1068 well with the MATE desktop. It lacks some features that may be expected by
1069 some users; these users may want to investigate other available window managers
1070 for use with MATE or as a standalone window manager.")
1071 (license license:gpl2+)))
1073 (define-public mate-user-guide
1074 (package
1075 (name "mate-user-guide")
1076 (version "1.22.0")
1077 (source
1078 (origin
1079 (method url-fetch)
1080 (uri (string-append "https://pub.mate-desktop.org/releases/"
1081 (version-major+minor version) "/"
1082 name "-" version ".tar.xz"))
1083 (sha256
1084 (base32
1085 "0ckn7h7l0qdgdx440dwx1h8i601s22sxlf5a7179hfirk9016j0z"))))
1086 (build-system gnu-build-system)
1087 (arguments
1088 `(#:phases
1089 (modify-phases %standard-phases
1090 (add-after 'unpack 'adjust-desktop-file
1091 (lambda* (#:key inputs #:allow-other-keys)
1092 (let* ((yelp (assoc-ref inputs "yelp")))
1093 (substitute* "mate-user-guide.desktop.in.in"
1094 (("yelp")
1095 (string-append yelp "/bin/yelp"))))
1096 #t)))))
1097 (native-inputs
1098 `(("pkg-config" ,pkg-config)
1099 ("intltool" ,intltool)
1100 ("gettext" ,gettext-minimal)
1101 ("yelp-tools" ,yelp-tools)
1102 ("yelp-xsl" ,yelp-xsl)))
1103 (inputs
1104 `(("yelp" ,yelp)))
1105 (home-page "https://mate-desktop.org/")
1106 (synopsis "User Documentation for Mate software")
1107 (description
1108 "MATE User Guide is a collection of documentation which details
1109 general use of the MATE Desktop environment. Topics covered include
1110 sessions, panels, menus, file management, and preferences.")
1111 (license (list license:fdl1.1+ license:gpl2+))))
1113 (define-public mate-calc
1114 (package
1115 (name "mate-calc")
1116 (version "1.22.0")
1117 (source
1118 (origin
1119 (method url-fetch)
1120 (uri (string-append "https://pub.mate-desktop.org/releases/"
1121 (version-major+minor version) "/"
1122 name "-" version ".tar.xz"))
1123 (sha256
1124 (base32
1125 "1njk6v7z3969ikvcrabr1lw5f5572vb14w064zm3mydj8cc5inlr"))))
1126 (build-system glib-or-gtk-build-system)
1127 (native-inputs
1128 `(("gettext" ,gettext-minimal)
1129 ("intltool" ,intltool)
1130 ("pkg-config" ,pkg-config)
1131 ("yelp-tools" ,yelp-tools)))
1132 (inputs
1133 `(("atk" ,atk)
1134 ("glib" ,glib)
1135 ("gtk+" ,gtk+)
1136 ("libxml2" ,libxml2)
1137 ("libcanberra" ,libcanberra)
1138 ("pango" ,pango)))
1139 (home-page "https://mate-desktop.org/")
1140 (synopsis "Calculator for MATE")
1141 (description
1142 "Mate Calc is the GTK+ calculator application for the MATE Desktop.")
1143 (license license:gpl2+)))
1145 (define-public mate-backgrounds
1146 (package
1147 (name "mate-backgrounds")
1148 (version "1.22.0")
1149 (source
1150 (origin
1151 (method url-fetch)
1152 (uri (string-append "https://pub.mate-desktop.org/releases/"
1153 (version-major+minor version) "/"
1154 name "-" version ".tar.xz"))
1155 (sha256
1156 (base32
1157 "1j9ch04qi2q4mdcvb92w667ra9hpfdf2bfpi1dpw0nbph7r6qvj9"))))
1158 (build-system glib-or-gtk-build-system)
1159 (native-inputs
1160 `(("intltool" ,intltool)))
1161 (home-page "https://mate-desktop.org/")
1162 (synopsis "Calculator for MATE")
1163 (description
1164 "This package contains a collection of graphics files which
1165 can be used as backgrounds in the MATE Desktop environment.")
1166 (license license:gpl2+)))
1168 (define-public mate-netbook
1169 (package
1170 (name "mate-netbook")
1171 (version "1.22.0")
1172 (source
1173 (origin
1174 (method url-fetch)
1175 (uri (string-append "https://pub.mate-desktop.org/releases/"
1176 (version-major+minor version) "/"
1177 name "-" version ".tar.xz"))
1178 (sha256
1179 (base32
1180 "17p1wv9bcr3kvlahnxmxj786vka86nysi90x5xci6ilwyjlaxh0l"))))
1181 (build-system glib-or-gtk-build-system)
1182 (native-inputs
1183 `(("gettext" ,gettext-minimal)
1184 ("intltool" ,intltool)
1185 ("pkg-config" ,pkg-config)))
1186 (inputs
1187 `(("cairo" ,cairo)
1188 ("glib" ,glib)
1189 ("gtk+" ,gtk+)
1190 ("libfakekey" ,libfakekey)
1191 ("libwnck" ,libwnck)
1192 ("libxtst" ,libxtst)
1193 ("libx11" ,libx11)
1194 ("mate-panel" ,mate-panel)
1195 ("xorgproto" ,xorgproto)))
1196 (home-page "https://mate-desktop.org/")
1197 (synopsis "Tool for MATE on Netbooks")
1198 (description
1199 "Mate Netbook is a simple window management tool which:
1201 @enumerate
1202 @item Allows you to set basic rules for a window type, such as maximise|undecorate
1203 @item Allows exceptions to the rules, based on string matching for window name
1204 and window class.
1205 @item Allows @code{reversing} of rules when the user manually changes something:
1206 Re-decorates windows on un-maximise.
1207 @end enumerate\n")
1208 (license license:gpl3+)))
1210 (define-public mate-screensaver
1211 (package
1212 (name "mate-screensaver")
1213 (version "1.22.0")
1214 (source
1215 (origin
1216 (method url-fetch)
1217 (uri (string-append "https://pub.mate-desktop.org/releases/"
1218 (version-major+minor version) "/"
1219 name "-" version ".tar.xz"))
1220 (sha256
1221 (base32
1222 "17fxyccsc410wbyxmds1sm7gjqbj6z46x5cjk1791hfzf0sh82sy"))))
1223 (build-system glib-or-gtk-build-system)
1224 (arguments
1225 `(#:configure-flags
1226 ;; FIXME: There is a permissions problem with screen locking
1227 ;; which effectively locks you out completely. Enable locking
1228 ;; once this has been fixed.
1229 (list "--enable-locking" "--with-kbd-layout-indicator"
1230 "--with-xf86gamma-ext" "--enable-pam"
1231 "--disable-schemas-compile" "--without-console-kit")
1232 #:phases
1233 (modify-phases %standard-phases
1234 (add-after 'unpack 'autoconf
1235 (lambda* (#:key outputs #:allow-other-keys)
1236 (let* ((out (assoc-ref outputs "out"))
1237 (dbus-dir (string-append out "/share/dbus-1/services")))
1238 (setenv "SHELL" (which "sh"))
1239 (setenv "CONFIG_SHELL" (which "sh"))
1240 (substitute* "configure"
1241 (("dbus-1") ""))))))))
1242 (native-inputs
1243 `(("automake" ,automake)
1244 ("autoconf" ,autoconf-wrapper)
1245 ("gettext" ,gettext-minimal)
1246 ("intltool" ,intltool)
1247 ("mate-common" ,mate-common)
1248 ("pkg-config" ,pkg-config)
1249 ("which" ,which)
1250 ("xorgproto" ,xorgproto)))
1251 (inputs
1252 `(("cairo" ,cairo)
1253 ("dconf" ,dconf)
1254 ("dbus" ,dbus)
1255 ("dbus-glib" ,dbus-glib)
1256 ("glib" ,glib)
1257 ("gtk+" ,gtk+)
1258 ("gdk-pixbuf" ,gdk-pixbuf+svg)
1259 ("libcanberra" ,libcanberra)
1260 ("libglade" ,libglade)
1261 ("libmatekbd" ,libmatekbd)
1262 ("libnotify" ,libnotify)
1263 ("libx11" ,libx11)
1264 ("libxext" ,libxext)
1265 ("libxklavier" ,libxklavier)
1266 ("libxrandr" ,libxrandr)
1267 ("libxrender" ,libxrender)
1268 ("libxscrnsaver" ,libxscrnsaver)
1269 ("libxxf86vm" ,libxxf86vm)
1270 ("linux-pam" ,linux-pam)
1271 ("mate-desktop" ,mate-desktop)
1272 ("mate-menus" ,mate-menus)
1273 ("pango" ,pango)
1274 ("startup-notification" ,startup-notification)))
1275 (home-page "https://mate-desktop.org/")
1276 (synopsis "Screensaver for MATE")
1277 (description
1278 "MATE backgrounds package contains a collection of graphics files which
1279 can be used as backgrounds in the MATE Desktop environment.")
1280 (license license:gpl2+)))
1282 (define-public mate-utils
1283 (package
1284 (name "mate-utils")
1285 (version "1.22.0")
1286 (source
1287 (origin
1288 (method url-fetch)
1289 (uri (string-append "https://pub.mate-desktop.org/releases/"
1290 (version-major+minor version) "/"
1291 name "-" version ".tar.xz"))
1292 (sha256
1293 (base32
1294 "0kz95hicjksgkwaj83fdp2rnaygfgjbj0jsnwy4n0lj5q90j7r28"))))
1295 (build-system glib-or-gtk-build-system)
1296 (native-inputs
1297 `(("gettext" ,gettext-minimal)
1298 ("gtk-doc" ,gtk-doc)
1299 ("intltool" ,intltool)
1300 ("libice" ,libice)
1301 ("libsm" ,libsm)
1302 ("pkg-config" ,pkg-config)
1303 ("scrollkeeper" ,scrollkeeper)
1304 ("xorgproto" ,xorgproto)
1305 ("yelp-tools" ,yelp-tools)))
1306 (inputs
1307 `(("atk" ,atk)
1308 ("cairo" ,cairo)
1309 ("glib" ,glib)
1310 ("gtk+" ,gtk+)
1311 ("gdk-pixbuf" ,gdk-pixbuf+svg)
1312 ("libcanberra" ,libcanberra)
1313 ("libgtop" ,libgtop)
1314 ("libx11" ,libx11)
1315 ("libxext" ,libxext)
1316 ("mate-panel" ,mate-panel)
1317 ("pango" ,pango)
1318 ("zlib" ,zlib)))
1319 (home-page "https://mate-desktop.org/")
1320 (synopsis "Utilities for the MATE Desktop")
1321 (description
1322 "Mate Utilities for the MATE Desktop containing:
1324 @enumerate
1325 @item mate-system-log
1326 @item mate-search-tool
1327 @item mate-dictionary
1328 @item mate-screenshot
1329 @item mate-disk-usage-analyzer
1330 @end enumerate\n")
1331 (license (list license:gpl2
1332 license:fdl1.1+
1333 license:lgpl2.1))))
1335 (define-public eom
1336 (package
1337 (name "eom")
1338 (version "1.22.0")
1339 (source
1340 (origin
1341 (method url-fetch)
1342 (uri (string-append "https://pub.mate-desktop.org/releases/"
1343 (version-major+minor version) "/"
1344 name "-" version ".tar.xz"))
1345 (sha256
1346 (base32
1347 "093vbip848bp9y603yasbrg1bcp68m64hma7zhi5m37x2r103r6l"))))
1348 (build-system glib-or-gtk-build-system)
1349 (native-inputs
1350 `(("gettext" ,gettext-minimal)
1351 ("gtk-doc" ,gtk-doc)
1352 ("gobject-introspection" ,gobject-introspection)
1353 ("intltool" ,intltool)
1354 ("pkg-config" ,pkg-config)
1355 ("yelp-tools" ,yelp-tools)))
1356 (inputs
1357 `(("atk" ,atk)
1358 ("cairo" ,cairo)
1359 ("dconf" ,dconf)
1360 ("dbus" ,dbus)
1361 ("dbus-glib" ,dbus-glib)
1362 ("exempi" ,exempi)
1363 ("glib" ,glib)
1364 ("gtk+" ,gtk+)
1365 ("gdk-pixbuf" ,gdk-pixbuf+svg)
1366 ("libcanberra" ,libcanberra)
1367 ("libx11" ,libx11)
1368 ("libxext" ,libxext)
1369 ("libpeas" ,libpeas)
1370 ("libxml2" ,libxml2)
1371 ("libexif" ,libexif)
1372 ("libjpeg" ,libjpeg)
1373 ("librsvg" ,librsvg)
1374 ("lcms" ,lcms)
1375 ("mate-desktop" ,mate-desktop)
1376 ("pango" ,pango)
1377 ("shared-mime-info" ,shared-mime-info)
1378 ("startup-notification" ,startup-notification)
1379 ("zlib" ,zlib)))
1380 (home-page "https://mate-desktop.org/")
1381 (synopsis "Eye of MATE")
1382 (description
1383 "Eye of MATE is the Image viewer for the MATE Desktop.")
1384 (license (list license:gpl2))))
1386 (define-public engrampa
1387 (package
1388 (name "engrampa")
1389 (version "1.22.0")
1390 (source
1391 (origin
1392 (method url-fetch)
1393 (uri (string-append "https://pub.mate-desktop.org/releases/"
1394 (version-major+minor version) "/"
1395 name "-" version ".tar.xz"))
1396 (sha256
1397 (base32
1398 "16yjplfl2sqa7n6404hjn0vwkh0xkdch73q7n5czynihmh3azc7p"))))
1399 (build-system glib-or-gtk-build-system)
1400 (arguments
1401 `(#:configure-flags (list "--disable-schemas-compile"
1402 "--disable-run-in-place"
1403 "--enable-magic"
1404 "--enable-packagekit"
1405 (string-append "--with-cajadir="
1406 (assoc-ref %outputs "out")
1407 "/lib/caja/extensions-2.0/"))
1408 #:phases
1409 (modify-phases %standard-phases
1410 (add-before 'install 'skip-gtk-update-icon-cache
1411 ;; Don't create 'icon-theme.cache'.
1412 (lambda _
1413 (substitute* "data/Makefile"
1414 (("gtk-update-icon-cache") "true"))
1415 #t)))))
1416 (native-inputs
1417 `(("gettext" ,gettext-minimal)
1418 ("gtk-doc" ,gtk-doc)
1419 ("intltool" ,intltool)
1420 ("pkg-config" ,pkg-config)
1421 ("yelp-tools" ,yelp-tools)))
1422 (inputs
1423 `(("caja" ,caja)
1424 ("file" ,file)
1425 ("glib" ,glib)
1426 ("gtk+" ,gtk+)
1427 ("gdk-pixbuf" ,gdk-pixbuf+svg)
1428 ("json-glib" ,json-glib)
1429 ("libcanberra" ,libcanberra)
1430 ("libx11" ,libx11)
1431 ("libsm" ,libsm)
1432 ("packagekit" ,packagekit)
1433 ("pango" ,pango)))
1434 (home-page "https://mate-desktop.org/")
1435 (synopsis "Archive Manager for MATE")
1436 (description
1437 "Engrampa is the archive manager for the MATE Desktop.")
1438 (license license:gpl2)))
1440 (define-public pluma
1441 (package
1442 (name "pluma")
1443 (version "1.22.0")
1444 (source
1445 (origin
1446 (method url-fetch)
1447 (uri (string-append "https://pub.mate-desktop.org/releases/"
1448 (version-major+minor version) "/"
1449 name "-" version ".tar.xz"))
1450 (sha256
1451 (base32
1452 "07rr5asdjr9slmaijp4m8v9vxscihvm36mfrwlp3lv12kry42a05"))))
1453 (build-system glib-or-gtk-build-system)
1454 (arguments
1455 `(; Tests can not succeed.
1456 ;; https://github.com/mate-desktop/mate-text-editor/issues/33
1457 #:tests? #f))
1458 (native-inputs
1459 `(("gettext" ,gettext-minimal)
1460 ("gtk-doc" ,gtk-doc)
1461 ("gobject-introspection" ,gobject-introspection)
1462 ("intltool" ,intltool)
1463 ("libtool" ,libtool)
1464 ("pkg-config" ,pkg-config)
1465 ("yelp-tools" ,yelp-tools)))
1466 (inputs
1467 `(("atk" ,atk)
1468 ("cairo" ,cairo)
1469 ("enchant" ,enchant-1.6)
1470 ("glib" ,glib)
1471 ("gtk+" ,gtk+)
1472 ("gtksourceview" ,gtksourceview-3)
1473 ("gdk-pixbuf" ,gdk-pixbuf)
1474 ("iso-codes" ,iso-codes)
1475 ("libcanberra" ,libcanberra)
1476 ("libx11" ,libx11)
1477 ("libsm" ,libsm)
1478 ("libpeas" ,libpeas)
1479 ("libxml2" ,libxml2)
1480 ("libice" ,libice)
1481 ("packagekit" ,packagekit)
1482 ("pango" ,pango)
1483 ("python-2" ,python-2)
1484 ("scrollkeeper" ,scrollkeeper)))
1485 (home-page "https://mate-desktop.org/")
1486 (synopsis "Text Editor for MATE")
1487 (description
1488 "Pluma is the text editor for the MATE Desktop.")
1489 (license license:gpl2)))
1491 (define-public mate-system-monitor
1492 (package
1493 (name "mate-system-monitor")
1494 (version "1.22.0")
1495 (source
1496 (origin
1497 (method url-fetch)
1498 (uri (string-append "https://pub.mate-desktop.org/releases/"
1499 (version-major+minor version) "/"
1500 name "-" version ".tar.xz"))
1501 (sha256
1502 (base32
1503 "0rs0n5ivmvi355fp3ymcp1jj2sz9viw31475aw7zh7s1l7dn969x"))))
1504 (build-system glib-or-gtk-build-system)
1505 (native-inputs
1506 `(("autoconf" ,autoconf)
1507 ("gettext" ,gettext-minimal)
1508 ("intltool" ,intltool)
1509 ("pkg-config" ,pkg-config)
1510 ("yelp-tools" ,yelp-tools)))
1511 (inputs
1512 `(("cairo" ,cairo)
1513 ("glib" ,glib)
1514 ("glibmm" ,glibmm)
1515 ("gtkmm" ,gtkmm)
1516 ("gtk+" ,gtk+)
1517 ("gdk-pixbuf" ,gdk-pixbuf)
1518 ("libsigc++" ,libsigc++)
1519 ("libcanberra" ,libcanberra)
1520 ("libxml2" ,libxml2)
1521 ("libwnck" ,libwnck)
1522 ("libgtop" ,libgtop)
1523 ("librsvg" ,librsvg)
1524 ("polkit" ,polkit)))
1525 (home-page "https://mate-desktop.org/")
1526 (synopsis "System Monitor for MATE")
1527 (description
1528 "Mate System Monitor provides a tool for for the
1529 MATE Desktop to monitor your system resources and usage.")
1530 (license license:gpl2)))
1532 (define-public mate-polkit
1533 (package
1534 (name "mate-polkit")
1535 (version "1.22.0")
1536 (source
1537 (origin
1538 (method url-fetch)
1539 (uri (string-append "https://pub.mate-desktop.org/releases/"
1540 (version-major+minor version) "/"
1541 name "-" version ".tar.xz"))
1542 (sha256
1543 (base32
1544 "02r8n71xflhvw2hsf6g4svdahzyg3r4n6xamasyzqfhyn0mqmjy0"))))
1545 (build-system glib-or-gtk-build-system)
1546 (native-inputs
1547 `(("gettext" ,gettext-minimal)
1548 ("gtk-doc" ,gtk-doc)
1549 ("intltool" ,intltool)
1550 ("libtool" ,libtool)
1551 ("pkg-config" ,pkg-config)))
1552 (inputs
1553 `(("accountsservice" ,accountsservice)
1554 ("glib" ,glib)
1555 ("gobject-introspection" ,gobject-introspection)
1556 ("gtk+" ,gtk+)
1557 ("gdk-pixbuf" ,gdk-pixbuf)
1558 ("polkit" ,polkit)))
1559 (home-page "https://mate-desktop.org/")
1560 (synopsis "DBus specific service for MATE")
1561 (description
1562 "MATE Polkit is a MATE specific DBUS service that is
1563 used to bring up authentication dialogs.")
1564 (license license:lgpl2.1)))
1566 (define-public mate
1567 (package
1568 (name "mate")
1569 (version (package-version mate-desktop))
1570 (source #f)
1571 (build-system trivial-build-system)
1572 (arguments
1573 `(#:modules ((guix build union))
1574 #:builder
1575 (begin
1576 (use-modules (ice-9 match)
1577 (guix build union))
1578 (match %build-inputs
1579 (((names . directories) ...)
1580 (union-build (assoc-ref %outputs "out")
1581 directories)
1582 #t)))))
1583 (inputs
1584 ;; TODO: Add more packages
1585 `(("at-spi2-core" ,at-spi2-core)
1586 ("atril" ,atril)
1587 ("caja" ,caja)
1588 ("dbus" ,dbus)
1589 ("dconf" ,dconf)
1590 ("desktop-file-utils" ,desktop-file-utils)
1591 ("engrampa" ,engrampa)
1592 ("eom" ,eom)
1593 ("font-cantarell" ,font-cantarell)
1594 ("glib-networking" ,glib-networking)
1595 ("gnome-keyring" ,gnome-keyring)
1596 ("gvfs" ,gvfs)
1597 ("hicolor-icon-theme" ,hicolor-icon-theme)
1598 ("libmatekbd" ,libmatekbd)
1599 ("libmateweather" ,libmateweather)
1600 ("libmatemixer" ,libmatemixer)
1601 ("marco" ,marco)
1602 ("mate-session-manager" ,mate-session-manager)
1603 ("mate-settings-daemon" ,mate-settings-daemon)
1604 ("mate-desktop" ,mate-desktop)
1605 ("mate-terminal" ,mate-terminal)
1606 ("mate-themes" ,mate-themes)
1607 ("mate-icon-theme" ,mate-icon-theme)
1608 ("mate-power-manager" ,mate-power-manager)
1609 ("mate-menu" ,mate-menus)
1610 ("mate-panel" ,mate-panel)
1611 ("mate-control-center" ,mate-control-center)
1612 ("mate-media" ,mate-media)
1613 ("mate-applets" ,mate-applets)
1614 ("mate-user-guide" ,mate-user-guide)
1615 ("mate-calc" ,mate-calc)
1616 ("mate-backgrounds" ,mate-backgrounds)
1617 ("mate-netbook" ,mate-netbook)
1618 ("mate-utils" ,mate-utils)
1619 ("mate-polkit" ,mate-polkit)
1620 ("mate-system-monitor" ,mate-system-monitor)
1621 ("mate-utils" ,mate-utils)
1622 ("pluma" ,pluma)
1623 ("pinentry-gnome3" ,pinentry-gnome3)
1624 ("pulseaudio" ,pulseaudio)
1625 ("shared-mime-info" ,shared-mime-info)
1626 ("yelp" ,yelp)
1627 ("zenity" ,zenity)))
1628 (synopsis "The MATE desktop environment")
1629 (home-page "https://mate-desktop.org/")
1630 (description
1631 "The MATE Desktop Environment is the continuation of GNOME 2. It provides
1632 an intuitive and attractive desktop environment using traditional metaphors for
1633 GNU/Linux systems. MATE is under active development to add support for new
1634 technologies while preserving a traditional desktop experience.")
1635 (license license:gpl2+)))