Tadashi Okoshi
slash****@users*****
2005年 6月 30日 (木) 08:41:03 JST
Index: affelio/lib/Affelio/App/Admin/AffelioNews.pm diff -u affelio/lib/Affelio/App/Admin/AffelioNews.pm:1.3 affelio/lib/Affelio/App/Admin/AffelioNews.pm:1.4 --- affelio/lib/Affelio/App/Admin/AffelioNews.pm:1.3 Mon Jun 27 16:18:20 2005 +++ affelio/lib/Affelio/App/Admin/AffelioNews.pm Thu Jun 30 08:41:03 2005 @@ -4,7 +4,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: AffelioNews.pm,v 1.3 2005/06/27 07:18:20 slash5234 Exp $ +# $Id: AffelioNews.pm,v 1.4 2005/06/29 23:41:03 slash5234 Exp $ package Affelio::App::Admin::AffelioNews; { @@ -62,7 +62,7 @@ } sysopen(OUT, "$af->{site__user_dir}/AffelioNews/news.html", - O_WRONLY|O_CREAT); + O_WRONLY|O_CREAT|O_TRUNC); my $line = 1; foreach my $ref(@{$rss->{items}}){ @@ -80,7 +80,7 @@ #Record current time sysopen(OUT, "$af->{site__user_dir}/AffelioNews/update", - O_WRONLY|O_CREAT); + O_WRONLY|O_CREAT|O_TRUNC); print OUT $cur_time; close(OUT); } Index: affelio/lib/Affelio/App/Admin/EditTemplates.pm diff -u affelio/lib/Affelio/App/Admin/EditTemplates.pm:1.6 affelio/lib/Affelio/App/Admin/EditTemplates.pm:1.7 --- affelio/lib/Affelio/App/Admin/EditTemplates.pm:1.6 Thu Jun 30 07:54:06 2005 +++ affelio/lib/Affelio/App/Admin/EditTemplates.pm Thu Jun 30 08:41:03 2005 @@ -4,7 +4,7 @@ # http://affelio.jp/ (Japan) # http://affelio.jp/ (USA and other area) # -# $Id: EditTemplates.pm,v 1.6 2005/06/29 22:54:06 slash5234 Exp $ +# $Id: EditTemplates.pm,v 1.7 2005/06/29 23:41:03 slash5234 Exp $ package Affelio::App::Admin::EditTemplates; { @@ -29,39 +29,32 @@ my $af = shift; my $cgi = shift; - sysopen(OUT, "$af->{site__user_dir}/af_templates/header.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/header.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("header.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/footer.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/footer.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("footer.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/right.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/right.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("right.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/left.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/left.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("left.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/body_index.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/body_index.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("body_index.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/body_flist.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/body_flist.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("body_flist.aftmpl"); - print OUT "\0"; close(OUT); - sysopen(OUT, "$af->{site__user_dir}/af_templates/body_profile.aftmpl", O_WRONLY); + sysopen(OUT, "$af->{site__user_dir}/af_templates/body_profile.aftmpl", O_WRONLY|O_TRUNC); print OUT $cgi->param("body_profile.aftmpl"); - print OUT "\0"; close(OUT); } @@ -172,9 +165,8 @@ ################################################### #Save to file in templates_dyn/ dir ################################################### - sysopen(OUT, "$af->{site__fs_root}/templates_dyn/$template_name.tmpl", O_WRONLY|O_CREAT, 0755); + sysopen(OUT, "$af->{site__fs_root}/templates_dyn/$template_name.tmpl", O_WRONLY|O_CREAT|O_TRUNC, 0755); print OUT $output_contents; - print OUT "\0"; close(OUT); }#if
