torrus, RT#10574

[freeside.git] / torrus / perllib / Torrus / Renderer / Freeside.pm

diff --git a/torrus/perllib/Torrus/Renderer/Freeside.pm b/torrus/perllib/Torrus/Renderer/Freeside.pm
index 7b30474..dcdf72b 100644 (file)
--- a/torrus/perllib/Torrus/Renderer/Freeside.pm
+++ b/torrus/perllib/Torrus/Renderer/Freeside.pm
@@ -11,7 +11,7 @@ my $outbuf;
 my( $fs_interp, $rt_interp ) = mason_interps('standalone', 'outbuf'=>\$outbuf);
 
 sub freesideHeader {
-  my($self, $title, $stylesheet, $c) = (shift, shift);
+  my($self, $title, $stylesheet) = @_;
 
   #from html-incblocks.txt
   my $head =
@@ -35,7 +35,7 @@ sub freesideHeader {
 
 sub freesideFooter {
   my $self = shift;
-  $self->FreesideComponent('/elements/footer.html');
+  $self->freesideComponent('/elements/footer.html');
 }
 
 our $FSURL;