Added GUID and pubDate entries to Stories. Updated tests. Fixes bug #11580

docs/changelog/7.x.x.txt

@@ -7,6 +7,7 @@
  - fixed #11583: EMS: Tokens do not follow their permissions
  - fixed #11584: Errors on checkout when payment problems occur
  - fixed #11582: Registering with a .mobi email address
+ - fixed #11580: Date not populated for Story Archive RSS feed
 
 7.9.5
  - Asset->www_copy now has a progress bar

lib/WebGUI/Asset/Story.pm

@@ -539,8 +539,10 @@ sub getRssData {
         title       => $self->get('headline') || $self->getTitle,
         description => $self->get('story'),
         'link'      => $self->getUrl,
+        guid        => $self->getUrl,
         author      => $self->get('byline'),
         date        => $self->get('lastModified'),
+        pubDate     => $self->session->datetime->epochToMail($self->get('creationDate')),
     };
 	return $data;
 }

t/Asset/Story.t

@@ -279,8 +279,10 @@ cmp_deeply(
         title       => 'Story 1',
         description => 'WebGUI was originally called Web Done Right.',
         'link'      => re('story-1$'),
+        guid        => re('story-1$'),
         author      => 'JT Smith',
         date        => $story->get('lastModified'),
+        pubDate     => $session->datetime->epochToMail($story->get('creationDate')),
     },
     'getRssData: returns correct data'
 );

t/Asset/Wobject/StoryArchive.t

@@ -552,6 +552,8 @@ cmp_deeply(
             description => ignore(),
             'link'      => ignore(),
             date        => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
             author      => ignore(),
         },
         {
@@ -560,6 +562,8 @@ cmp_deeply(
             'link'      => ignore(),
             date        => ignore(),
             author      => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
         },
         {
             title => 'Story 3',
@@ -567,6 +571,8 @@ cmp_deeply(
             'link'      => ignore(),
             date        => ignore(),
             author      => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
         },
     ],
     'rssFeedItems'

t/Asset/Wobject/StoryTopic.t

@@ -292,6 +292,8 @@ cmp_deeply(
             'link'      => ignore(),
             date        => ignore(),
             author      => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
         },
         {
             title => 'red',
@@ -299,6 +301,8 @@ cmp_deeply(
             'link'      => ignore(),
             date        => ignore(),
             author      => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
         },
         {
             title => 'brooks',
@@ -306,6 +310,8 @@ cmp_deeply(
             'link'      => ignore(),
             date        => ignore(),
             author      => ignore(),
+            guid        => ignore(),
+            pubDate     => ignore(),
         },
     ],
     'rssFeedItems'