From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:40617) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1igX1v-0003nB-E2 for guix-patches@gnu.org; Sun, 15 Dec 2019 11:46:04 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1igX1u-0005ju-4r for guix-patches@gnu.org; Sun, 15 Dec 2019 11:46:03 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:59348) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1igX1u-0005jQ-0s for guix-patches@gnu.org; Sun, 15 Dec 2019 11:46:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1igX1t-0006A0-WC for guix-patches@gnu.org; Sun, 15 Dec 2019 11:46:02 -0500 Subject: [bug#38626] [PATCH] gnu: Add xsnow. Resent-Message-ID: Received: from eggs.gnu.org ([2001:470:142:3::10]:39782) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1igX1R-0003mb-VN for guix-patches@gnu.org; Sun, 15 Dec 2019 11:45:35 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1igX1O-0004fx-3m for guix-patches@gnu.org; Sun, 15 Dec 2019 11:45:33 -0500 Received: from araneo.si ([90.157.193.204]:41424) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1igX1N-0004Xv-Hu for guix-patches@gnu.org; Sun, 15 Dec 2019 11:45:30 -0500 Received: from araneo.si (localhost.lan [127.0.0.1]) by araneo.si (OpenSMTPD) with ESMTP id 8c6170d0 for ; Sun, 15 Dec 2019 16:45:26 +0000 (UTC) From: Timotej Lazar Date: Sun, 15 Dec 2019 17:44:24 +0100 Message-Id: <20191215164422.27752-1-timotej.lazar@araneo.si> MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 38626@debbugs.gnu.org Cc: Timotej Lazar * gnu/packages/toys.scm (xsnow): New variable. --- Hi, turns out xsnow is free now, so here’s a patch for the holidays. :) Timotej gnu/packages/toys.scm | 44 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) diff --git a/gnu/packages/toys.scm b/gnu/packages/toys.scm index 8c1a03b5d2..fd86aec6ef 100644 --- a/gnu/packages/toys.scm +++ b/gnu/packages/toys.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice ;;; Copyright © 2019 Jesse Gibbons +;;; Copyright © 2019 Timotej Lazar ;;; ;;; This file is part of GNU Guix. ;;; @@ -20,9 +21,14 @@ (define-module (gnu packages toys) #:use-module (gnu packages bison) #:use-module (gnu packages flex) + #:use-module (gnu packages gtk) #:use-module (gnu packages ncurses) #:use-module (gnu packages perl) + #:use-module (gnu packages pkg-config) + #:use-module (gnu packages xml) + #:use-module (gnu packages xorg) #:use-module (guix build-system gnu) + #:use-module (guix download) #:use-module (guix git-download) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages)) @@ -156,3 +162,41 @@ The GNU project hosts a similar collection of filters, the GNU talkfilters.") license:public-domain ; jethro, kraut, ken, studly license:gpl1+ ; cockney, jive, nyc only say "gpl" license:expat))))) ; newspeak + +(define-public xsnow + (package + (name "xsnow") + (version "2.0.15") + (source + (origin + (method url-fetch) + (uri (string-append + "https://www.ratrabbit.nl/ratrabbit/system/files/xsnow/xsnow-" + version ".tar.gz")) + (sha256 + (base32 "086s42frbz9bk550414v908yrax4iwwlvlxv4zwp39cyp7wgws03")))) + (build-system gnu-build-system) + (arguments + '(#:phases + (modify-phases %standard-phases + (add-before 'configure 'fix-install-path + (lambda _ + ;; Install program to bin instead of games. + (substitute* "src/Makefile.in" + (("(gamesdir = \\$\\(exec_prefix\\)/)games" _ prefix) + (string-append prefix "bin"))) + #t))))) + (inputs + `(("gtk+" ,gtk+) + ("libx11" ,libx11) + ("libxpm" ,libxpm) + ("libxt" ,libxt) + ("libxxml2" ,libxml2))) + (native-inputs + `(("pkg-config" ,pkg-config))) + (home-page "https://www.ratrabbit.nl/ratrabbit/content/xsnow/introduction") + (synopsis "Let it snow on the desktop") + (description "@code{Xsnow} animates snowfall and Santa with reindeer on +the desktop background. Additional customizable effects include wind, stars +and various scenery elements.") + (license license:gpl3+))) -- 2.24.1