templating stuff : use of gettemplate method
This commit is contained in:
parent
495bf81d1c
commit
6e9e3cf3ab
5 changed files with 10 additions and 17 deletions
|
@ -29,9 +29,7 @@ use HTML::Template;
|
|||
|
||||
my $input = new CGI;
|
||||
|
||||
my $theme = $input->param('theme'); # only used if allowthemeoverride is set
|
||||
my %tmpldata = pathtotemplate ( template => 'imemberentry.tmpl', theme => $theme );
|
||||
my $template = HTML::Template->new(filename => $tmpldata{'path'}, die_on_bad_params => 0);
|
||||
my $template = gettemplate("members/imemberentry.tmpl");
|
||||
|
||||
my $member=$input->param('bornum');
|
||||
if ($member eq ''){
|
||||
|
|
|
@ -29,9 +29,7 @@ use HTML::Template;
|
|||
|
||||
my $input = new CGI;
|
||||
|
||||
my $theme = $input->param('theme'); # only used if allowthemeoverride is set
|
||||
my %tmpldata = pathtotemplate ( template => 'jmemberentry.tmpl', theme => $theme );
|
||||
my $template = HTML::Template->new(filename => $tmpldata{'path'}, die_on_bad_params => 0);
|
||||
my $template = gettemplate("members/jmemberentry.tmpl");
|
||||
|
||||
my $member=$input->param('bornum');
|
||||
if ($member eq ''){
|
||||
|
|
|
@ -33,11 +33,12 @@ 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' );
|
||||
#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,
|
||||
loop_context_vars => 1 );
|
||||
#my $template = HTML::Template->new( filename => $tmpldata{'path'},
|
||||
# die_on_bad_params => 0,
|
||||
# loop_context_vars => 1 );
|
||||
my $template = gettemplate("members/member.tmpl");
|
||||
|
||||
my $member=$input->param('member');
|
||||
$member=~ s/\,//g;
|
||||
|
|
|
@ -33,9 +33,7 @@ use HTML::Template;
|
|||
|
||||
my $input = new CGI;
|
||||
|
||||
my $theme = $input->param('theme'); # only used if allowthemeoverride is set
|
||||
my %tmpldata = pathtotemplate ( template => 'memberentry.tmpl', theme => $theme );
|
||||
my $template = HTML::Template->new(filename => $tmpldata{'path'}, die_on_bad_params => 0);
|
||||
my $template = gettemplate("members/memberentry.tmpl");
|
||||
|
||||
my $member=$input->param('bornum');
|
||||
if ($member eq ''){
|
||||
|
@ -130,7 +128,7 @@ if ($delete){
|
|||
my $ethnicitycategoriescount=$#{$categories};
|
||||
my $ethcatpopup;
|
||||
if ($ethnicitycategoriescount>=0) {
|
||||
$ethcatpopup = popup_menu(-name=>'ethnicity',
|
||||
$ethcatpopup = CGI::popup_menu(-name=>'ethnicity',
|
||||
-values=>$categories,
|
||||
-default=>$data->{'ethnicity'},
|
||||
-labels=>$labels);
|
||||
|
|
|
@ -46,9 +46,7 @@ my $dbh = C4::Context->dbh;
|
|||
|
||||
my $input = new CGI;
|
||||
|
||||
my $theme = $input->param('theme'); # only used if allowthemeoverride is set
|
||||
my %tmpldata = pathtotemplate ( template => 'moremember.tmpl', theme => $theme );
|
||||
my $template = HTML::Template->new(filename => $tmpldata{'path'}, die_on_bad_params => 0);
|
||||
my $template = gettemplate("members/moremember.tmpl");
|
||||
|
||||
my $bornum=$input->param('bornum');
|
||||
|
||||
|
|
Loading…
Reference in a new issue