Permalink
Browse files

actually apply the method restrictions requested for article objects

  • Loading branch information...
1 parent f25bd6e commit ea975bf4f7900f1ec6c027d9db520af9ea416197 @tonycoz committed Mar 4, 2013
Showing with 3 additions and 3 deletions.
  1. +3 −3 site/cgi-bin/modules/Article.pm
@@ -8,7 +8,7 @@ use vars qw/@ISA/;
@ISA = qw/Squirrel::Row BSE::TB::SiteCommon BSE::TB::TagOwner/;
use Carp 'confess';
-our $VERSION = "1.017";
+our $VERSION = "1.018";
=head1 NAME
@@ -596,10 +596,10 @@ sub should_generate {
return $self->is_linked && $self->listed && $self->is_released && !$self->is_expired;
}
-sub restricted_methods {
+sub restricted_method {
my ($self, $name) = @_;
- return $self->SUPER::restricted_methods($name)
+ return $self->SUPER::restricted_method($name)
|| $name =~ /^(?:update_|remove_|add_)/;
}

0 comments on commit ea975bf

Please sign in to comment.