From: Tomas Doran <bobtfish@bobtfish.net>
Date: Sun, 10 Jan 2010 23:35:56 +0000 (+0000)
Subject: Add a trivial test
X-Git-Tag: 0.002002~39
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=635943a0c3dd3d39a8def1b66ea2762155fdaab3;hp=dbcc98a9ad1706303f55a7889c60eea0fd1e4638;p=catagits%2FGitalist.git

Add a trivial test
---

diff --git a/t/02git_Repository.t b/t/02git_Repository.t
index 8f123f5..bf4791b 100644
--- a/t/02git_Repository.t
+++ b/t/02git_Repository.t
@@ -37,11 +37,15 @@ 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',
+    'is_bare' => 1,
+    'owner' => "T\x{e9}st",
+    'last_change' => '2009-11-12T19:00:34Z',
+    'name' => 'repo1',
+    'description' => 'some test repository'
+};
 
 is_deeply $proj->pack, {
     '__CLASS__' => 'Gitalist::Git::Repository',