actually apply the method restrictions requested for article objects

tonycoz · Mar 4, 2013 · ea975bf · ea975bf
1 parent f25bd6e
commit ea975bf
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/site/cgi-bin/modules/Article.pm b/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_)/;
 }