From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sat, 16 May 2009 07:34:21 +0000 (+0000)
Subject: Now we can do diag $rs->hri_dump, ain't that nice
X-Git-Tag: v0.08103~76
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d6191de1a556525075eae5803a90f9fe5a05b5ad;p=dbsrgits%2FDBIx-Class.git

Now we can do diag $rs->hri_dump, ain't that nice
---

diff --git a/t/lib/DBICTest/BaseResultSet.pm b/t/lib/DBICTest/BaseResultSet.pm
index 7269f30..6d9df85 100644
--- a/t/lib/DBICTest/BaseResultSet.pm
+++ b/t/lib/DBICTest/BaseResultSet.pm
@@ -6,4 +6,8 @@ use warnings;
 
 use base qw/DBIx::Class::ResultSet/;
 
+sub hri_dump {
+  return shift->search ({}, { result_class => 'DBIx::Class::ResultClass::HashRefInflator' });
+}
+
 1;