Remove stub. Use requires to force the sub.

This commit is contained in:
Colin Kuskie 2010-02-19 01:35:52 -08:00
parent 5a31bc8f54
commit 381e1ff022

View file

@ -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)