svnno****@sourc*****
svnno****@sourc*****
2009年 3月 27日 (金) 15:49:21 JST
Revision: 1087 http://svn.sourceforge.jp/view?root=slashdotjp&view=rev&rev=1087 Author: tach Date: 2009-03-27 15:49:21 +0900 (Fri, 27 Mar 2009) Log Message: ----------- add importing function name Modified Paths: -------------- slashjp/trunk/Slash/DB/Utility/Utility.pm -------------- next part -------------- Modified: slashjp/trunk/Slash/DB/Utility/Utility.pm =================================================================== --- slashjp/trunk/Slash/DB/Utility/Utility.pm 2009-03-27 03:20:27 UTC (rev 1086) +++ slashjp/trunk/Slash/DB/Utility/Utility.pm 2009-03-27 06:49:21 UTC (rev 1087) @@ -9,7 +9,7 @@ use Slash::Utility; use DBIx::Password; use Time::HiRes; -use Encode; +use Encode qw(decode_utf8 is_utf8); our $VERSION = $Slash::Constants::VERSION; @@ -1090,7 +1090,7 @@ my($self, $sql) = @_; $self->_refCheck($sql); $self->sqlConnect() or return undef; - Encode::is_utf8($sql) or $sql = decode_utf8($sql); + is_utf8($sql) or $sql = decode_utf8($sql); my $rows = $self->{_dbh}->do($sql); unless ($rows) { unless ($sql =~ /^INSERT\s+IGNORE\b/i) {