From e61fd0f04839004347e5d61efc0baa1eb1b450b6 Mon Sep 17 00:00:00 2001
From: Eric Bavier <bavier@member.fsf.org>
Date: Mon, 16 Mar 2015 22:11:26 -0500
Subject: [PATCH] gnu: Add DBIx-Class-IntrospectableM2M.
* gnu/packages/databases.scm (perl-dbix-class-introspectablem2m): New
variable.
---
gnu/packages/databases.scm | 26 ++++++++++++++++++++++++++
1 file changed, 26 insertions(+)
diff --git a/gnu/packages/databases.scm b/gnu/packages/databases.scm
index da51c81b96e..a89830aa3b8 100644
--- a/gnu/packages/databases.scm
+++ b/gnu/packages/databases.scm
@@ -4,6 +4,7 @@
;;; Copyright © 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2014 David Thompson <davet@gnu.org>
;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
+;;; Copyright © 2015 Eric Bavier <bavier@member.fsf.org>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -357,6 +358,31 @@ (define-public perl-dbix-class
\"ORDER BY\" and \"HAVING\" support.")
(license (package-license perl))))
+(define-public perl-dbix-class-introspectablem2m
+ (package
+ (name "perl-dbix-class-introspectablem2m")
+ (version "0.001001")
+ (source
+ (origin
+ (method url-fetch)
+ (uri (string-append "mirror://cpan/authors/id/G/GR/GRODITI/"
+ "DBIx-Class-IntrospectableM2M-" version ".tar.gz"))
+ (sha256
+ (base32
+ "0p9zx1yc1f6jg583l206wilsni2v8mlngc2vf2q8yn10pmy4y6wm"))))
+ (build-system perl-build-system)
+ (propagated-inputs
+ `(("perl-dbix-class" ,perl-dbix-class)))
+ (home-page "http://search.cpan.org/dist/DBIx-Class-IntrospectableM2M")
+ (synopsis "Introspect many-to-many relationships")
+ (description "Because the many-to-many relationships are not real
+relationships, they can not be introspected with DBIx::Class. Many-to-many
+relationships are actually just a collection of convenience methods installed
+to bridge two relationships. This DBIx::Class component can be used to store
+all relevant information about these non-relationships so they can later be
+introspected and examined.")
+ (license (package-license perl))))
+
(define-public perl-dbd-sqlite
(package
(name "perl-dbd-sqlite")
--
GitLab