From mboxrd@z Thu Jan 1 00:00:00 1970 From: John Darrington Subject: [PATCH] gnu: Add xboing Date: Mon, 13 Oct 2014 21:18:21 +0200 Message-ID: <1413227901-17916-1-git-send-email-jmd@gnu.org> References: <87d29wat4v.fsf@gnu.org> Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:51424) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Xdl8c-0002rX-W3 for guix-devel@gnu.org; Mon, 13 Oct 2014 15:18:40 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Xdl8X-0007Fm-CY for guix-devel@gnu.org; Mon, 13 Oct 2014 15:18:34 -0400 In-Reply-To: <87d29wat4v.fsf@gnu.org> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org Cc: John Darrington * gnu/packages/games.scm (xboing): New variable. --- gnu/packages/games.scm | 54 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 54 insertions(+) diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm index 1a911b7..e7868af 100644 --- a/gnu/packages/games.scm +++ b/gnu/packages/games.scm @@ -24,6 +24,7 @@ #:use-module (guix packages) #:use-module (guix download) #:use-module (gnu packages) + #:use-module (gnu packages admin) #:use-module (gnu packages boost) #:use-module (gnu packages gettext) #:use-module (gnu packages gl) @@ -321,3 +322,56 @@ and Makruk. Several lesser-known variants are also supported. It presents a fully interactive graphical interface and it can load and save games in the Portable Game Notation.") (license gpl3+))) + + +(define-public xboing + (package + (name "xboing") + (version "2.4") + (source + (origin + (method url-fetch) + (uri (string-append "http://www.techrescue.org/xboing/xboing" + version ".tar.gz")) + (sha256 + (base32 "16m2si8wmshxpifk861vhpqviqxgcg8bxj6wfw8hpnm4r2w9q0b7")))) + (arguments + `(#:tests? #f + #:phases + (alist-replace + 'configure + (lambda* (#:key outputs #:allow-other-keys) + + (substitute* "Imakefile" + (("XPMINCLUDE[\t ]*= -I/usr/X11/include/X11") + (string-append "XPMINCLUDE = -I" (assoc-ref %build-inputs "libxpm") + "/include/X11"))) + + (substitute* "Imakefile" + (("XBOING_DIR = \\.") "XBOING_DIR=$(PROJECTROOT)")) + + ;; FIXME: HIGH_SCORE_FILE should be set to somewhere writeable + + (zero? (system* "xmkmf" "-a" + (string-append "-DProjectRoot=" + (assoc-ref outputs "out"))))) + (alist-replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (and + (zero? (system* "make" "install.man")) + (zero? (system* "make" "install")))) + %standard-phases)))) + (inputs `(("libx11" ,libx11) + ("libxext" ,libxext) + ("libxpm" ,libxpm))) + (native-inputs `(("imake" ,imake) + ("inetutils" ,inetutils) + ("makedepend" ,makedepend))) + (build-system gnu-build-system) + (home-page "http://www.techrescue.org/xboing") + (synopsis "Ball and paddle game") + (description "XBoing is a blockout type game where you have a paddle which +you control to bounce a ball around the game zone destroying blocks with a +proton ball. Each block carries a different point value. The more blocks you +destroy, the better your score. The person with the highest score wins.") + (license (x11-style "file://COPYING" "Very similar to the X11 licence.")))) -- 1.7.10.4