svnno****@sourc*****
svnno****@sourc*****
2007年 9月 28日 (金) 17:11:33 JST
スラドRevision: 177
http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=177
Author: tach
Date: 2007-09-28 17:11:33 +0900 (Fri, 28 Sep 2007)
Log Message:
-----------
force to set UTF8 flag because these fields are "blob".
Modified Paths:
--------------
slashjp/trunk/plugins/Messages/DB/MySQL/MySQL.pm
-------------- next part --------------
Modified: slashjp/trunk/plugins/Messages/DB/MySQL/MySQL.pm
===================================================================
--- slashjp/trunk/plugins/Messages/DB/MySQL/MySQL.pm 2007-09-28 08:10:15 UTC (rev 176)
+++ slashjp/trunk/plugins/Messages/DB/MySQL/MySQL.pm 2007-09-28 08:11:33 UTC (rev 177)
@@ -216,6 +216,10 @@
$prime = $self->{_web_prime1};
$self->sqlUpdate($table, { readed => 1 }, "$prime=$id_db");
+ # force to set UTF8 flag because these fields are 'blob'.
+ $data->{'subject'} = Encode::decode_utf8($data->{'subject'}) unless (Encode::is_utf8($data->{'subject'}));
+ $data->{'message'} = Encode::decode_utf8($data->{'message'}) unless (Encode::is_utf8($data->{'message'}));
+
return $data;
}
@@ -230,6 +234,11 @@
my $data = $self->sqlSelectAllHashrefArray(
$cols, $table, "$prime=$id_db", $other
);
+
+ # force to set UTF8 flag because these fields are 'blob'.
+ map { $_->{'subject'} = Encode::decode_utf8($_->{'subject'}) unless (Encode::is_utf8($_->{'subject'})); } @$data;
+ map { $_->{'message'} = Encode::decode_utf8($_->{'message'}) unless (Encode::is_utf8($_->{'message'})); } @$data;
+
return $data;
}