42a6eaaceb
* gnu/packages/mate.scm (caja): New variable. Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
266 lines
10 KiB
Scheme
266 lines
10 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2016 Fabian Harfert <fhmgufs@web.de>
|
|
;;; Copyright © 2016, 2017 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2017 ng0 <ng0@infotropique.org>
|
|
;;;
|
|
;;; This file is part of GNU Guix.
|
|
;;;
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
;;; under the terms of the GNU General Public License as published by
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
;;; your option) any later version.
|
|
;;;
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;;; GNU General Public License for more details.
|
|
;;;
|
|
;;; You should have received a copy of the GNU General Public License
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
(define-module (gnu packages mate)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix download)
|
|
#:use-module (guix utils)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (guix build-system glib-or-gtk)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages pkg-config)
|
|
#:use-module (gnu packages freedesktop)
|
|
#:use-module (gnu packages glib)
|
|
#:use-module (gnu packages gtk)
|
|
#:use-module (gnu packages gnome)
|
|
#:use-module (gnu packages xorg)
|
|
#:use-module (gnu packages xdisorg)
|
|
#:use-module (gnu packages base)
|
|
#:use-module (gnu packages xml)
|
|
#:use-module (gnu packages photo)
|
|
#:use-module (gnu packages python))
|
|
|
|
(define-public mate-icon-theme
|
|
(package
|
|
(name "mate-icon-theme")
|
|
(version "1.18.2")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/"
|
|
(version-major+minor version) "/"
|
|
name "-" version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"0si3li3kza7s45zhasjvqn5f85zpkn0x8i4kq1dlnqvjjqzkg4ch"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("icon-naming-utils" ,icon-naming-utils)))
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis "The MATE desktop environment icon theme")
|
|
(description
|
|
"This package contains the default icon theme used by the MATE desktop.")
|
|
(license license:lgpl3+)))
|
|
|
|
(define-public mate-themes
|
|
(package
|
|
(name "mate-themes")
|
|
(version "3.22.13")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/themes/"
|
|
(version-major+minor version) "/mate-themes-"
|
|
version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"1p7w63an8qs15hkj79nppy7471glv0rm1b0himn3c4w69q8qdc9i"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("gdk-pixbuf" ,gdk-pixbuf) ; gdk-pixbuf+svg isn't needed
|
|
("gtk" ,gtk+-2)))
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis
|
|
"Official themes for the MATE desktop")
|
|
(description
|
|
"This package includes the standard themes for the MATE desktop, for
|
|
example Menta, TraditionalOk, GreenLaguna or BlackMate. This package has
|
|
themes for both gtk+-2 and gtk+-3.")
|
|
(license (list license:lgpl2.1+ license:cc-by-sa3.0 license:gpl3+
|
|
license:gpl2+))))
|
|
|
|
(define-public mate-desktop
|
|
(package
|
|
(name "mate-desktop")
|
|
(version "1.18.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/"
|
|
(version-major+minor version) "/"
|
|
name "-" version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"12iv2y4dan962fs7vkkxbjkp77pbvjnwfa43ggr0zkdsc3ydjbbg"))))
|
|
(build-system gnu-build-system)
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("glib:bin" ,glib "bin")
|
|
("gobject-introspection" ,gobject-introspection)
|
|
("yelp-tools" ,yelp-tools)
|
|
("gtk-doc" ,gtk-doc)))
|
|
(inputs
|
|
`(("gtk+" ,gtk+)
|
|
("libxrandr" ,libxrandr)
|
|
("startup-notification" ,startup-notification)))
|
|
(propagated-inputs
|
|
`(("dconf" ,dconf))) ; mate-desktop-2.0.pc
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis "Library with common API for various MATE modules")
|
|
(description
|
|
"This package contains a public API shared by several applications on the
|
|
desktop and the mate-about program.")
|
|
(license (list license:gpl2+ license:lgpl2.0+ license:fdl1.1+))))
|
|
|
|
(define-public libmateweather
|
|
(package
|
|
(name "libmateweather")
|
|
(version "1.18.1")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/"
|
|
(version-major+minor version) "/"
|
|
name "-" version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"0z6vfh42fv9rqjrraqfpf6h9nd9h662bxy3l3r48j19xvxrwmx3a"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
'(#:configure-flags
|
|
(list (string-append "--with-zoneinfo-dir="
|
|
(assoc-ref %build-inputs "tzdata")
|
|
"/share/zoneinfo"))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-before 'check 'fix-tzdata-location
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
(substitute* "data/check-timezones.sh"
|
|
(("/usr/share/zoneinfo/zone.tab")
|
|
(string-append (assoc-ref inputs "tzdata")
|
|
"/share/zoneinfo/zone.tab")))
|
|
#t)))))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("dconf" ,dconf)
|
|
("glib:bin" ,glib "bin")))
|
|
(inputs
|
|
`(("gtk+" ,gtk+)
|
|
("tzdata" ,tzdata)))
|
|
(propagated-inputs
|
|
;; both of these are requires.private in mateweather.pc
|
|
`(("libsoup" ,libsoup)
|
|
("libxml2" ,libxml2)))
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis "MATE library for weather information from the Internet")
|
|
(description
|
|
"This library provides access to weather information from the internet for
|
|
the MATE desktop environment.")
|
|
(license license:lgpl2.1+)))
|
|
|
|
(define-public mate-menus
|
|
(package
|
|
(name "mate-menus")
|
|
(version "1.18.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/"
|
|
(version-major+minor version) "/"
|
|
name "-" version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"05kyr37xqv6hm1rlvnqd5ng0x1n883brqynkirkk5drl56axnz7h"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after
|
|
'unpack 'fix-introspection-install-dir
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(substitute* '("configure")
|
|
(("`\\$PKG_CONFIG --variable=girdir gobject-introspection-1.0`")
|
|
(string-append "\"" out "/share/gir-1.0/\""))
|
|
(("\\$\\(\\$PKG_CONFIG --variable=typelibdir gobject-introspection-1.0\\)")
|
|
(string-append out "/lib/girepository-1.0/")))
|
|
#t))))))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("gobject-introspection" ,gobject-introspection)))
|
|
(inputs
|
|
`(("glib" ,glib)
|
|
("python" ,python-2)))
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis "Freedesktop menu specification implementation for MATE")
|
|
(description
|
|
"The package contains an implementation of the freedesktop menu
|
|
specification, the MATE menu layout configuration files, .directory files and
|
|
assorted menu related utility programs.")
|
|
(license (list license:gpl2+ license:lgpl2.0+))))
|
|
|
|
(define-public caja
|
|
(package
|
|
(name "caja")
|
|
(version "1.18.3")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://pub.mate-desktop.org/releases/"
|
|
(version-major+minor version) "/"
|
|
name "-" version ".tar.xz"))
|
|
(sha256
|
|
(base32
|
|
"0mljqcx7k8p27854zm7qzzn8ca6hs7hva9p43hp4p507z52caqmm"))))
|
|
(build-system glib-or-gtk-build-system)
|
|
(arguments
|
|
`(#:configure-flags '("--disable-update-mimedb")
|
|
#:tests? #f ; tests fail even with display set
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-before 'check 'pre-check
|
|
(lambda _
|
|
;; Tests require a running X server.
|
|
(system "Xvfb :1 &")
|
|
(setenv "DISPLAY" ":1")
|
|
;; For the missing /etc/machine-id.
|
|
(setenv "DBUS_FATAL_WARNINGS" "0")
|
|
#t)))))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("glib:bin" ,glib "bin")
|
|
("xorg-server" ,xorg-server)
|
|
("gobject-introspection" ,gobject-introspection)))
|
|
(inputs
|
|
`(("exempi" ,exempi)
|
|
("gtk+" ,gtk+)
|
|
("gvfs" ,gvfs)
|
|
("libexif" ,libexif)
|
|
("libnotify" ,libnotify)
|
|
("libsm" ,libsm)
|
|
("libxml2" ,libxml2)
|
|
("mate-desktop" ,mate-desktop)
|
|
("startup-notification" ,startup-notification)))
|
|
(home-page "https://mate-desktop.org/")
|
|
(synopsis "File manager for the MATE desktop")
|
|
(description
|
|
"Caja is the official file manager for the MATE desktop.
|
|
It allows for browsing directories, as well as previewing files and launching
|
|
applications associated with them. Caja is also responsible for handling the
|
|
icons on the MATE desktop. It works on local and remote filesystems.")
|
|
;; There is a note about a TRADEMARKS_NOTICE file in COPYING which
|
|
;; does not exist. It is safe to assume that this is of no concern
|
|
;; for us.
|
|
(license license:gpl2+)))
|