[Bast-commits] r9417 - ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet

[idn at dev.catalyst.perl.org]

Author: idn
Date: 2010-05-22 21:21:55 +0100 (Sat, 22 May 2010)
New Revision: 9417

Modified:
   ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm
Log:
If the author isn't set in the post, take it from the feed entry in the database

Modified: ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm
===================================================================
--- ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm	2010-05-22 01:21:41 UTC (rev 9416)
+++ ironman/branches/mk-ii/Perlanet-IronMan/lib/Perlanet/IronMan.pm	2010-05-22 20:21:55 UTC (rev 9417)
@@ -210,7 +210,7 @@
             # Do that whole insert thing...
             $self->schema->resultset('Post')->create( {
                 feed_id          => $post->feed->id,
-                author           => $post->_entry->author,
+                author           => $post->_entry->author || $post->feed->title,
                 tags             => join(",", @tags),
                 url              => $post->_entry->link,
                 title            => $post->_entry->title,