aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndreas Enge <andreas@enge.fr>2013-10-01 00:26:54 +0200
committerAndreas Enge <andreas@enge.fr>2013-10-01 00:26:54 +0200
commit5fda4784f804c2b96b7a8507e6cf5f7852c1d41b (patch)
treea663a8d168ddd1ea8e18b5ad9884cd31718690d6
parent3b8e434794bff56f8fd4b524f0ac196f25a30fc0 (diff)
downloadguix-5fda4784f804c2b96b7a8507e6cf5f7852c1d41b.tar
guix-5fda4784f804c2b96b7a8507e6cf5f7852c1d41b.tar.gz
gnu: Add at-spi2-atk.
* gnu/packages/gtk.scm (at-spi2-atk): New variable.
-rw-r--r--gnu/packages/gtk.scm48
1 files changed, 47 insertions, 1 deletions
diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm
index 3312bdadfc..005d977ba3 100644
--- a/gnu/packages/gtk.scm
+++ b/gnu/packages/gtk.scm
@@ -214,6 +214,34 @@ is part of the GNOME accessibility project.")
(license license:lgpl2.0+)
(home-page "https://projects.gnome.org/accessibility/")))
+(define-public at-spi2-atk
+ (package
+ (name "at-spi2-atk")
+ (version "2.10.0")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "mirror://gnome/sources/" name "/"
+ (string-take version 4) "/" name "-"
+ version ".tar.xz"))
+ (sha256
+ (base32
+ "150sqc21difazqd53llwfdaqnwfy73bic9hia41xpfy9kcpzz9yy"))))
+ (build-system gnu-build-system)
+ (inputs `(("atk" ,atk)
+ ("at-spi2-core" ,at-spi2-core)
+ ("dbus" ,dbus)
+ ("glib" ,glib)
+ ("pkg-config" ,pkg-config)))
+ (arguments
+ `(#:tests? #f)) ; FIXME: droute/droute-test fails; one should disable
+ ; tests in a more fine-grained way.
+ (synopsis "Assistive Technology Service Provider Interface, ATK bindings")
+ (description
+ "The Assistive Technology Service Provider Interface
+is part of the GNOME accessibility project.")
+ (license license:lgpl2.0+)
+ (home-page "https://projects.gnome.org/accessibility/")))
+
(define-public gtk+
(package
(name "gtk+")
@@ -252,7 +280,25 @@ application suites.")
(license license:lgpl2.0+)
(home-page "http://www.gtk.org/")))
-
+(define-public gtk+-3
+ (package (inherit gtk+)
+ (version "3.10.0")
+ (source (origin
+ (method url-fetch)
+ (uri (string-append "mirror://gnome/sources/gtk+/"
+ (string-take version 4) "/gtk+-"
+ version ".tar.xz"))
+ (sha256
+ (base32
+ "1zjkbjvp6ay08107r6zfsrp39x7qfadbd86p3hs5v4ydc2rzwnb5"))))
+ (inputs
+ `(("at-spi2-core" ,at-spi2-core)
+ ("libxi" ,libxi)
+ ("libxinerama" ,libxinerama)
+ ("pkg-config" ,pkg-config)))
+ (arguments
+ `(#:configure-flags '("--enable-x11-backend"))))) ; should not be needed in > 3.10.0
+
;;;
;;; Guile bindings.
;;;