[Bps-public-commit] r14040 - in Net-Trac/trunk: t

[jesse at bestpractical.com]

Author: jesse
Date: Sun Jul 13 15:24:58 2008
New Revision: 14040

Modified:
   Net-Trac/trunk/lib/Net/Trac/.TicketHistory.pm.swp
   Net-Trac/trunk/lib/Net/Trac/.TicketHistoryEntry.pm.swp
   Net-Trac/trunk/lib/Net/Trac/TicketHistory.pm
   Net-Trac/trunk/lib/Net/Trac/TicketHistoryEntry.pm
   Net-Trac/trunk/t/.basic.t.swp

Log:
* Fixing some typos. doesn't work or anything

Modified: Net-Trac/trunk/lib/Net/Trac/.TicketHistory.pm.swp
==============================================================================
Binary files. No diff available.

Modified: Net-Trac/trunk/lib/Net/Trac/.TicketHistoryEntry.pm.swp
==============================================================================
Binary files. No diff available.

Modified: Net-Trac/trunk/lib/Net/Trac/TicketHistory.pm
==============================================================================
--- Net-Trac/trunk/lib/Net/Trac/TicketHistory.pm	(original)
+++ Net-Trac/trunk/lib/Net/Trac/TicketHistory.pm	Sun Jul 13 15:24:58 2008
@@ -1,4 +1,5 @@
 package Net::Trac::TicketHistory;
+use Net::Trac::TicketHistoryEntry;
 use Moose;
 
 has connection => (
@@ -16,9 +17,8 @@
     my $feed = $self->connection->_fetch_feed("/ticket/".$self->ticket."?format=rss");
 
     my @entries = $feed->entries;
-    die "Found ".$#entries; 
     foreach my $entry (@entries) {
-        my $e = Net::Trac::TicektHistory->new( { connection => $self->connection});
+        my $e = Net::Trac::TicketHistoryEntry->new( { connection => $self->connection});
         $e->parse_feed_entry($entry);
     }
     # http://barnowl.mit.edu/ticket/1?format=rss

Modified: Net-Trac/trunk/lib/Net/Trac/TicketHistoryEntry.pm
==============================================================================
--- Net-Trac/trunk/lib/Net/Trac/TicketHistoryEntry.pm	(original)
+++ Net-Trac/trunk/lib/Net/Trac/TicketHistoryEntry.pm	Sun Jul 13 15:24:58 2008
@@ -10,8 +10,8 @@
 sub parse_feed_entry {
     my $self = shift;
     my $xml_feed_entry = shift;
-    warn $xml_feed_entry;
-
+    warn YAML::Dump($xml_feed_entry);
+    
     return 1;
 }
 

Modified: Net-Trac/trunk/t/.basic.t.swp
==============================================================================
Binary files. No diff available.