svnno****@sourc*****
svnno****@sourc*****
2007年 12月 24日 (月) 20:29:21 JST
SRADRevision: 348
http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=348
Author: tach
Date: 2007-12-24 20:29:21 +0900 (Mon, 24 Dec 2007)
Log Message:
-----------
Suppress warning of portald
Modified Paths:
--------------
slashjp/trunk/Slash/DB/Static/MySQL/MySQL.pm
-------------- next part --------------
Modified: slashjp/trunk/Slash/DB/Static/MySQL/MySQL.pm
===================================================================
--- slashjp/trunk/Slash/DB/Static/MySQL/MySQL.pm 2007-12-24 10:13:46 UTC (rev 347)
+++ slashjp/trunk/Slash/DB/Static/MySQL/MySQL.pm 2007-12-24 11:29:21 UTC (rev 348)
@@ -859,7 +859,7 @@
$_->[1] = $self->sqlSelect(
'UNIX_TIMESTAMP(MAX(ts)) - UNIX_TIMESTAMP(MIN(ts))',
'moderatorlog',
- "cid=$_->[0]");
+ "cid=$_->[0]") || 0;
}
@$cids = sort { $a->[1] <=> $b->[1] } @$cids;
@@ -1509,10 +1509,13 @@
sub createRSS {
my($self, $bid, $item) = @_;
#use Data::Dumper; $Data::Dumper::Sortkeys = 1; print STDERR "createRSS $bid item: " . Dumper($item);
+ $item->{title} ||= '';
$item->{title} =~ /^(.*)$/;
my $title_md5 = md5_hex(encode_utf8($1));
+ $item->{description} ||= '';
$item->{description} =~ /^(.*)$/;
my $description_md5 = md5_hex(encode_utf8($1));
+ $item->{'link'} ||= '';
$item->{'link'} =~ /^(.*)$/;
my $link_md5 = md5_hex(encode_utf8($1));