From 5b8759304197989c00096df74dbbe3532aaf3e21 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Stefan=20Stefanovi=C4=87?= <address@hidden>
Date: Thu, 18 Oct 2018 15:47:39 +0200
Subject: [PATCH] gnu: xorg: Add xcb-util-errors.

* gnu/packages/xorg.scm (xcb-util-errors): New variable.
---
 gnu/packages/xorg.scm | 52 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)

diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index 4cf8eb2de..56eb49b22 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -18,6 +18,7 @@
 ;;; Copyright © 2018 Kei Kebreau <address@hidden>
 ;;; Copyright © 2018 Oleg Pykhalov <address@hidden>
 ;;; Copyright © 2018 Benjamin Slade <address@hidden>
+;;; Copyright © 2018 Stefan Stefanović <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -5479,6 +5480,57 @@ The XCB util module provides the following libraries:
       "file://COPYING"
       "See COPYING in the distribution."))))
 
+(define-public xcb-util-errors
+  (let ((commit "5d660ebe872cadcdc85de9d6f9afe05de629c030")
+        (revision "1"))
+    (package
+      (name "xcb-util-errors")
+      (version (git-version "1.0" revision commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://anongit.freedesktop.org/git/xcb/util-errors.git")
+                      (commit commit)
+                      (recursive? #t)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "12bah0iz5k6b9hwlc5zffyfg2gnrajll3gn5s8zmazgynvw72ahg"))))
+     (build-system gnu-build-system)
+     (outputs '("out"))
+     (inputs
+      `(("util-macros" ,util-macros)
+        ("libxcb" ,libxcb)))
+     (propagated-inputs
+      `(("xcb-proto" ,xcb-proto)))
+     (native-inputs
+      `(("autoconf" ,autoconf)
+        ("automake" ,automake)
+        ("libtool" ,libtool)
+        ("python-2" ,python-2)
+        ("pkg-config" ,pkg-config)))
+     (arguments
+      `(#:phases
+        (modify-phases %standard-phases
+          (replace 'bootstrap
+            (lambda _
+              (invoke "autoreconf" "-v" "--install"))))))
+     (home-page "https://cgit.freedesktop.org/xcb/util-errors/")
+     (synopsis "XCB helper library for printing information about X11 errors")
+     (description
+      "The XCB util module provides a number of libraries which sit on
+top of libxcb, the core X protocol library, and some of the extension
+libraries.  These experimental libraries provide convenience functions
+and interfaces which make the raw X protocol more usable.  Some of the
+libraries also provide client-side code which is not strictly part of
+the X protocol but which has traditionally been provided by Xlib.
+
+The XCB util-errors module provides the following library:
+
+- errors: utility library that gives human readable names to
+error codes, event codes and also to major and minor numbers.")
+     (license (license:non-copyleft
+               "file://COPYING" "See COPYING in the distribution.")))))
 
 (define-public xcb-util-image
   (package
-- 
2.19.1