Subject: [bug#32586] [PATCH] asasa

From: pimi <[email-masked]>
Date: Thu, 6 Sep 2018 17:11:20 +0200

---
 gnu/packages/cran.scm | 24 +++++++++++++++++++++++
 gnu/packages/gtk.scm  | 45 +++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 69 insertions(+)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 447be5657..745464ce2 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -33,6 +33,8 @@
   #:use-module (guix build-system r)
   #:use-module (gnu packages compression)
   #:use-module (gnu packages gcc)
+  #:use-module (gnu packages gnome)
+  #:use-module (gnu packages gtk)
   #:use-module (gnu packages machine-learning)
   #:use-module (gnu packages maths)
   #:use-module (gnu packages mpi)
@@ -5411,3 +5413,25 @@ maximum cycle number.  The @code{r-abcoptim} implements the Artificial bee
 colony optimization algorithm @url{http://mf.erciyes.edu.tr/abc/pub/tr06_2005.pdf}.
   This version is a work-in-progress and is written in R code.")
     (license license:expat)))
+
+(define-public r-svgui
+  (package
+    (name "r-svgui")
+    (version "1.0.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (cran-uri "svGUI" version))
+       (sha256
+        (base32 "1r7ab0p4yr8q03gj02hmj7k1ghksgkg4nx750c0ajfs2q9y1dxfc"))))
+    (properties `((upstream-name . "svGUI")))
+    (build-system r-build-system)
+    (home-page "https://github.com/SciViews/svGUI/")
+    (synopsis "Functions for managing GUI clients in R")
+    (description
+     "The SciViews @code{svGUI} package eases the management of Graphical User
+Interfaces (GUI) in R.  It is independent from any particular GUI widgets (Tk,
+Gtk2, native, ...).  It centralizes info about GUI elements currently used, and
+it dispatches GUI calls to the particular toolkits in use in function of the
+context (is R run at the terminal, within a Tk application, a HTML page?).")
+    (license license:gpl2)))
diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm
index 4daaad0eb..e0d52a8dd 100644
--- a/gnu/packages/gtk.scm
+++ b/gnu/packages/gtk.scm
@@ -1658,3 +1658,48 @@ Parcellite and adds bugfixes and features.")
 it does not deal with windowing system surfaces, drawing, scene graphs, or
 input.")
     (license license:expat)))
+
+(define-public yad
+  (let ((commit "8957347fc6376bc4ec992adef078a7b53399850e")
+        (revision "1"))
+    (package
+     (name "yad")
+     (version (git-version "0.40.3" revision commit))
+     (source
+      (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/v1cont/yad.git")
+             (commit commit)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "04vqm6khqsaar25qa8xaixp6i1jp7v33b32f6i425kfdi6wfr2yb"))))
+     (build-system gnu-build-system)
+     (arguments
+      `(#:configure-flags
+        '("--with-gtk=gtk3"
+          "--enable-html"
+          "--enable-gio"
+          "--enable-spell"
+          "--enable-icon-browser")
+        #:phases
+        (modify-phases %standard-phases
+                       (replace 'bootstrap
+                                (lambda _
+                                  (invoke "autoreconf" "-vif")
+                                  (invoke "intltoolize" "--force" "--automake")
+                                  #t)))))
+     (inputs
+      `(("gtk+" ,gtk+)))
+     (native-inputs
+      `(("autoconf" ,autoconf)
+        ("automake" ,automake)
+        ("intltool" ,intltool)
+        ("pkg-config" ,pkg-config)))
+     (home-page "https://sourceforge.net/projects/yad-dialog/")
+     (synopsis "GTK+ dialog boxes for shell scripts")
+     (description
+      "This program allows you to display GTK+ dialog boxes from command line or
+shell scripts.  Example of how to use @code{yad} can be consulted at
+@url{https://sourceforge.net/p/yad-dialog/wiki/browse_pages/}.")
+     (license license:gpl3+))))
-- 
2.17.1