From 7ffa58b3042dbe75de82483bbc9947474e308ff1 Mon Sep 17 00:00:00 2001
From: Eric Bavier <bavier@member.fsf.org>
Date: Thu, 12 Mar 2015 13:13:33 -0500
Subject: [PATCH] gnu: Add Tree-Simple-VisitorFactory.

* gnu/packages/perl.scm (perl-tree-simple-visitorfactory): New
  variable.
---
 gnu/packages/perl.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm
index 847abe7ec3..7292da2f14 100644
--- a/gnu/packages/perl.scm
+++ b/gnu/packages/perl.scm
@@ -2925,6 +2925,30 @@ and time() calls.")
 simple n-ary tree.")
     (license (package-license perl))))
 
+(define-public perl-tree-simple-visitorfactory
+  (package
+    (name "perl-tree-simple-visitorfactory")
+    (version "0.12")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "mirror://cpan/authors/id/R/RS/RSAVAGE/"
+                           "Tree-Simple-VisitorFactory-" version ".tgz"))
+       (sha256
+        (base32
+         "1g27xl48q1vr7aikhxg4vvcsj1si8allxz59vmnks61wsw4by7vg"))))
+    (build-system perl-build-system)
+    (native-inputs
+     `(("perl-test-exception" ,perl-test-exception)))
+    (propagated-inputs
+     `(("perl-tree-simple" ,perl-tree-simple)
+       ("perl-base" ,perl-base)))
+    (home-page "http://search.cpan.org/dist/Tree-Simple-VisitorFactory")
+    (synopsis "Factory object for dispensing Visitor objects")
+    (description "This module is a factory for dispensing
+Tree::Simple::Visitor::* objects.")
+    (license (package-license perl))))
+
 (define-public perl-try-tiny
   (package
     (name "perl-try-tiny")