From 4f376c3bf564a01a426371a8d8e90d747c2d1976 Mon Sep 17 00:00:00 2001 From: Raymond Nicholson Date: Fri, 1 Apr 2016 22:15:37 +0100 Subject: [PATCH] gnu: add guile-zenity. * gnu/packages/gnome.scm (guile-zenity): New variable. --- gnu/packages/gnome.scm | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm index 11ed486..dabd0cf 100644 --- a/gnu/packages/gnome.scm +++ b/gnu/packages/gnome.scm @@ -15,6 +15,7 @@ ;;; Copyright © 2016 Rene Saavedra ;;; Copyright © 2016 Jochem Raat ;;; Copyright © 2016 Rene Saavedra +;;; Copyright © 2016 Raymond Nicholson ;;; ;;; This file is part of GNU Guix. ;;; @@ -3992,6 +3993,38 @@ powerful general purpose text editor.") to display dialog boxes from the commandline and shell scripts.") (license license:lgpl2.0+))) +(define-public guile-zenity + (package + (name "guile-zenity") + (version "0.1") + (source (origin + (method url-fetch/tarbomb) + (file-name "guile-zenity-ca94f01675.tar.gz") + (uri (string-append "https://notabug.org/rain1/guile-zenity/archive/v" + version ".tar.gz")) + (sha256 + (base32 + "1z2jyxkq5xbq1s04fw10ypjmbxl7hrinycg0grw8d82q19nn4fag")))) + (build-system gnu-build-system) + (arguments + `(#:make-flags + (list (string-append "PREFIX=" (assoc-ref %outputs "out")) + (string-append "GUILE_MODULE_DIR=" "/share/guile/site/2.0")) + #:tests? #f + #:phases + (modify-phases %standard-phases + (delete 'configure)))) + (inputs + `(("guile" ,guile-2.0) + ("zenity" ,zenity))) + (propagated-inputs + `(("guile" ,guile-2.0))) + (synopsis "Guile bindings to zenity.") + (home-page "https://notabug.org/rain1/guile-zenity") + (description + "Zenity is a command line tool that displays simple dialog boxes. This library creates scheme procedures that build up a zenity command line, call it then parse the result and return it as scheme data.") + (license license:gpl3+))) + (define-public mutter (package (name "mutter") -- 2.7.3