[Koha-cvs] CVS: koha member.pl,1.4,1.5
Andrew Arensburger
arensb at users.sourceforge.net
Thu Oct 10 07:49:54 CEST 2002
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv8681
Modified Files:
member.pl
Log Message:
Use the default theme if it wasn't given as a CGI parameter.
Index: member.pl
===================================================================
RCS file: /cvsroot/koha/koha/member.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** member.pl 17 Sep 2002 15:08:42 -0000 1.4
--- member.pl 10 Oct 2002 05:49:52 -0000 1.5
***************
*** 30,35 ****
my $input = new CGI;
! my $theme = $input->param('theme'); # only used if allowthemeoverride is set
my %tmpldata = pathtotemplate ( template => 'member.tmpl', theme => $theme, language => 'fi' );
my $template = HTML::Template->new( filename => $tmpldata{'path'},
die_on_bad_params => 0,
--- 30,37 ----
my $input = new CGI;
! my $theme = $input->param('theme') || "default";
! # only used if allowthemeoverride is set
my %tmpldata = pathtotemplate ( template => 'member.tmpl', theme => $theme, language => 'fi' );
+ # FIXME - Error-checking
my $template = HTML::Template->new( filename => $tmpldata{'path'},
die_on_bad_params => 0,
More information about the Koha-cvs
mailing list