Tatsuki SUGIURA
sugi****@users*****
2006年 2月 14日 (火) 01:57:12 JST
Index: slashjp/Slash/DB/MySQL/MySQL.pm diff -u slashjp/Slash/DB/MySQL/MySQL.pm:1.8 slashjp/Slash/DB/MySQL/MySQL.pm:1.9 --- slashjp/Slash/DB/MySQL/MySQL.pm:1.8 Tue Feb 7 04:05:18 2006 +++ slashjp/Slash/DB/MySQL/MySQL.pm Tue Feb 14 01:57:12 2006 @@ -1,7 +1,7 @@ # This code is a part of Slash, and is released under the GPL. # Copyright 1997-2004 by Open Source Development Network. See README # and COPYING for more information, or see http://slashcode.com/. -# $Id: MySQL.pm,v 1.8 2006/02/06 19:05:18 sugi Exp $ +# $Id: MySQL.pm,v 1.9 2006/02/13 16:57:12 sugi Exp $ package Slash::DB::MySQL; use strict; @@ -20,7 +20,7 @@ use base 'Slash::DB::Utility'; use Slash::Constants ':messages'; -($VERSION) = ' $Revision: 1.8 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.9 $ ' =~ /\$Revision:\s+([^\s]+)/; # Fry: How can I live my life if I can't tell good from evil? @@ -308,7 +308,7 @@ # Perl has lost the flag somewhere sub sqlDo{ my($self, $sql) = @_; - $sql = decode_utf8( $sql ); # unless $sql =~ /accesslog_admin|people/; + $sql = decode_utf8( $sql ) unless $sql =~ /INSERT\s+INTO\s+accesslog_admin|UPDATE\s+users_info\s+SET\s+people\s+=/; $self->SUPER::sqlDo( $sql ); }
SRAD