From: Tomas Doran <bobtfish@bobtfish.net>
Date: Sun, 10 Jan 2010 23:29:22 +0000 (+0000)
Subject: Do the correct thing with type contraints etc to be able to serialize things
X-Git-Tag: 0.002002~40
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=dbcc98a9ad1706303f55a7889c60eea0fd1e4638;hp=12f1305713050f39671e216a2526beb6f2e97d79;p=catagits%2FGitalist.git

Do the correct thing with type contraints etc to be able to serialize things
---

diff --git a/t/02git_Repository.t b/t/02git_Repository.t
index 175e52f..8f123f5 100644
--- a/t/02git_Repository.t
+++ b/t/02git_Repository.t
@@ -37,6 +37,11 @@ isa_ok($proj->path, 'Path::Class::Dir', 'repository path');
 is($proj->name, qw/repo1/, 'repository name is set');
 is($proj->description, qq/some test repository/, 'repository description loaded');
 isa_ok($proj->last_change, 'DateTime', 'last_change');
+{
+    my $packed = $proj->pack;
+    use Data::Dumper;
+    warn Dumper $packed;
+}
 
 is_deeply $proj->pack, {
     '__CLASS__' => 'Gitalist::Git::Repository',