;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017 ng0 ;;; ;;; 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 . (define-module (gnu packages cinnamon) #: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 (gnu packages) #:use-module (gnu packages autotools) #:use-module (gnu packages freedesktop) #:use-module (gnu packages gettext) #:use-module (gnu packages glib) #:use-module (gnu packages gtk) #:use-module (gnu packages gnome) #:use-module (gnu packages pkg-config) #:use-module (gnu packages pulseaudio) #:use-module (gnu packages python) #:use-module (gnu packages xorg)) (define-public cinnamon-desktop (package (name "cinnamon-desktop") (version "3.4.2") (source (origin (method url-fetch) (uri (string-append "https://github.com/linuxmint/cinnamon-desktop/" "archive/" version ".tar.gz")) (file-name (string-append name "-" version ".tar.gz")) (sha256 (base32 "1jf24csrbfi9aiza1g70jpvsbjiqwphk0i5wilxq9kpjjsl99maq")))) (build-system gnu-build-system) (arguments `(#:phases (modify-phases %standard-phases (add-after 'unpack 'autoconf (lambda _ (mkdir-p "m4") (zero? (and (system* "glib-gettextize" "--force" "--copy") (system* "intltoolize" "--force" "--copy" "--automake") (system* "autoreconf" "--verbose" "--force" "--install")))))))) ;; TODO: package 'libgsystem'. (inputs `(("accountsservice" ,accountsservice) ("gtk+" ,gtk+) ("glib" ,glib) ("gobject-introspection" ,gobject-introspection) ("gnome-common" ,gnome-common) ("libxkbfile" ,libxkbfile) ("libxrandr" ,libxrandr) ("python-2" ,python-2) ("pulseaudio" ,pulseaudio) ("xkeyboard-config" ,xkeyboard-config))) (native-inputs `(("autoconf" ,autoconf) ("automake" ,automake) ("gettext" ,gettext-minimal) ("glib" ,glib "bin") ; glib-gettextize ("intltool" ,intltool) ("libtool" ,libtool) ("pkg-config" ,pkg-config))) (home-page "https://github.com/linuxmint/cinnamon-desktop/") (synopsis "Library for the Cinnamon Desktop") (description "The cinnamon-desktop package contains the libcinnamon-desktop library, as well as some desktop-wide documents.") (license (list license:gpl2+ license:lgpl2.0+ license:expat)))) ;display-name.c , edid-parse.c 2020-06-27daemon: Remove OpenSSL hash compatibility wrappers.Ludovic Courtès * nix/libutil/hash.cc (struct Ctx): Copy from gcrypt-hash.hh. (start, update, finish): Use gcrypt functions directly instead of OpenSSL-like wrappers. * nix/libutil/gcrypt-hash.cc, nix/libutil/gcrypt-hash.hh, nix/libutil/md5.h, nix/libutil/sha1.h, nix/libutil/sha256.h, nix/libutil/sha512.h: Remove. * nix/local.mk (libutil_a_SOURCES, libutil_headers): Adjust accordingly. 2020-06-27daemon: Map directly to gcrypt hash functions.Ludovic Courtès * nix/libutil/hash.hh (HashType): Map directly to GCRY_MD_ values. (md5HashSize, sha1HashSize, sha256HashSize, sha512HashSize): Remove. * nix/libutil/hash.cc (Hash::Hash): Use 'gcry_md_get_algo_dlen'.