From 381e1ff02278cf9c1a7c37530f871586aca0a292 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Fri, 19 Feb 2010 01:35:52 -0800
Subject: [PATCH] Remove stub.  Use requires to force the sub.

---
 lib/WebGUI/Role/Asset/RssFeed.pm | 32 +++-----------------------------
 1 file changed, 3 insertions(+), 29 deletions(-)

diff --git a/lib/WebGUI/Role/Asset/RssFeed.pm b/lib/WebGUI/Role/Asset/RssFeed.pm
index 5ee2db959..47aaee034 100644
--- a/lib/WebGUI/Role/Asset/RssFeed.pm
+++ b/lib/WebGUI/Role/Asset/RssFeed.pm
@@ -15,7 +15,8 @@ package WebGUI::Role::Asset::RssFeed;
 =cut
 
 use strict;
-with WebGUI::Definition::Role::Asset;
+use Moose::Role;
+use WebGUI::Definition::Asset;
 define tableName      => 'assetAspectRssFeed';
 property itemsPerFeed => (
     noFormPost => 0,
@@ -94,7 +95,7 @@ sub _feedHeaderLinks_options {
     return \&headerLinksOptions;
 }
 
-
+requires 'getRssFeedItems';
 
 use WebGUI::Exception;
 use WebGUI::Storage;
@@ -121,29 +122,6 @@ These methods are available from this class:
 
 #-------------------------------------------------------------------
 
-=head2 definition
-
-Extends the definition to add the RSS fields.
-
-=cut
-
-sub definition {
-	my $class = shift;
-	my $session = shift;
-	my $definition = shift;
-	my %properties;
-	tie %properties, 'Tie::IxHash';
-	%properties = (
-	    );
-	push(@{$definition}, {
-		autoGenerateForms   => 1,
-		properties          => \%properties
-	    });
-	return $class->next::method($session, $definition);
-}
-
-#-------------------------------------------------------------------
-
 =head2 _httpBasicLogin ( )
 
 Set header values and content to show the HTTP Basic Auth login box.
@@ -308,10 +286,6 @@ This is optional.  A unique descriptor for this item.
 
 =cut
 
-sub getRssFeedItems {
-    WebGUI::Error::OverrideMe->throw();
-}
-
 #-------------------------------------------------------------------
 
 =head2 _getFeedUrl ($extension)