Yoshihisa Fukuhara
higef****@users*****
2005年 6月 22日 (水) 01:35:31 JST
Index: affelio/lib/AffelioApp.pm diff -u affelio/lib/AffelioApp.pm:1.2 affelio/lib/AffelioApp.pm:1.3 --- affelio/lib/AffelioApp.pm:1.2 Mon Jun 20 14:06:13 2005 +++ affelio/lib/AffelioApp.pm Wed Jun 22 01:35:31 2005 @@ -6,7 +6,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: AffelioApp.pm,v 1.2 2005/06/20 05:06:13 slash5234 Exp $ +# $Id: AffelioApp.pm,v 1.3 2005/06/21 16:35:31 higefuku Exp $ package AffelioApp; { @@ -272,16 +272,17 @@ $af->get_module_list(\%output_data, $self->{visitor_afid},$self->{visitor_type}); $af->get_guest_owner_list(\%output_data); + debug_print("new HTML::Template filename=".$TMPL_FILE); #Initiate Template - my $tmpl = new HTML::Template( filename => $TMPL_FILE, - die_on_bad_params => 0); + my $tmpl = new HTML::Template( filename => $TMPL_FILE,die_on_bad_params => 0); + #my $tmpl = HTML::Template->new(filename => "/Users/fuku/Sites/affelio/templates_dyn/Header.tmpl",die_on_bad_params => 0); foreach my $data_key (keys(%output_data)) { debug_print("$data_key = $output_data{$data_key}"); $tmpl->param($data_key => $output_data{$data_key}); } - - my $final_out = $af->translate_templateL10N($tmpl->output) - . '<div id="afPubMain">' . "\n"; + my $tmp = $tmpl->output; + my $final_out = $self->{af}->translate_templateL10N($tmp).'<div id="afPubMain">' . "\n"; + debug_print("final_out = ".$tmp); return($final_out);
