svnno****@sourc*****
svnno****@sourc*****
2007年 11月 19日 (月) 19:17:30 JST
Revision: 265 http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=265 Author: tach Date: 2007-11-19 19:17:30 +0900 (Mon, 19 Nov 2007) Log Message: ----------- Fix: Wide character in print warning at create_sidebar.pl Modified Paths: -------------- slashjp/trunk/debian/changelog slashjp/trunk/themes/slashcode/tasks/create_sidebar.pl -------------- next part -------------- Modified: slashjp/trunk/debian/changelog =================================================================== --- slashjp/trunk/debian/changelog 2007-11-19 09:29:46 UTC (rev 264) +++ slashjp/trunk/debian/changelog 2007-11-19 10:17:30 UTC (rev 265) @@ -1,9 +1,11 @@ slash (2.5.0.184-1) unstable; urgency=low * New upstream CVS release - * Fix: Wide character in print warning at new_headfoot.pl + * Fix: Wide character in print warning at following tasks: + - new_headfoot.pl + - create_sidebar.pl - -- Taku YASUI <tach****@osdn*****> Mon, 19 Nov 2007 17:32:07 +0900 + -- Taku YASUI <tach****@osdn*****> Mon, 19 Nov 2007 10:16:18 +0000 slash (2.5.0.183-0.1) unstable; urgency=low Modified: slashjp/trunk/themes/slashcode/tasks/create_sidebar.pl =================================================================== --- slashjp/trunk/themes/slashcode/tasks/create_sidebar.pl 2007-11-19 09:29:46 UTC (rev 264) +++ slashjp/trunk/themes/slashcode/tasks/create_sidebar.pl 2007-11-19 10:17:30 UTC (rev 265) @@ -27,14 +27,15 @@ $story->{title} = $storydata->{$story->{stoid}}->{title}; } #$topic = $topic ||= 'index'; - open(FILE, ">$constants->{basedir}/$constants->{sidebardir}/" + open(my $fh, ">$constants->{basedir}/$constants->{sidebardir}/" . $slashdb->getTopic($tid)->{keyword} . ".shtml") || next; - print FILE slashDisplay('sidebar', + binmode $fh, ':utf8'; + print $fh slashDisplay('sidebar', { stories => $stories, section => $nexus_topics->{$tid} }, { Return => 1 }); - close(FILE); + close($fh); } };