From 1ed6d5bc86d3c30243855c3996b473e83ac8ba03 Mon Sep 17 00:00:00 2001
From: Eric Bavier <bavier@member.fsf.org>
Date: Tue, 7 Apr 2015 16:44:31 -0500
Subject: [PATCH] gnu: Add XML-SAX-Base.

* gnu/packages/xml.scm (perl-xml-sax-base): New variable.
---
 gnu/packages/xml.scm | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

diff --git a/gnu/packages/xml.scm b/gnu/packages/xml.scm
index 4f8cafdb71..e298369668 100644
--- a/gnu/packages/xml.scm
+++ b/gnu/packages/xml.scm
@@ -200,6 +200,28 @@ (define-public perl-xml-namespacesupport
 checks.")
     (license (package-license perl))))
 
+(define-public perl-xml-sax-base
+  (package
+    (name "perl-xml-sax-base")
+    (version "1.08")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "mirror://cpan/authors/id/G/GR/GRANTM/"
+                           "XML-SAX-Base-" version ".tar.gz"))
+       (sha256
+        (base32
+         "17i161rq1ngjlk0c8vdkrkkc56y1pf51k1g54y28py0micqp0qk6"))))
+    (build-system perl-build-system)
+    (home-page "http://search.cpan.org/dist/XML-SAX-Base")
+    (synopsis "Base class for SAX Drivers and Filters")
+    (description "This module has a very simple task - to be a base class for
+PerlSAX drivers and filters.  It's default behaviour is to pass the input
+directly to the output unchanged.  It can be useful to use this module as a
+base class so you don't have to, for example, implement the characters()
+callback.")
+    (license (package-license perl))))
+
 (define-public perl-xml-simple
   (package
     (name "perl-xml-simple")