add importing function name
@@ -9,7 +9,7 @@ | ||
9 | 9 | use Slash::Utility; |
10 | 10 | use DBIx::Password; |
11 | 11 | use Time::HiRes; |
12 | -use Encode; | |
12 | +use Encode qw(decode_utf8 is_utf8); | |
13 | 13 | |
14 | 14 | our $VERSION = $Slash::Constants::VERSION; |
15 | 15 |
@@ -1090,7 +1090,7 @@ | ||
1090 | 1090 | my($self, $sql) = @_; |
1091 | 1091 | $self->_refCheck($sql); |
1092 | 1092 | $self->sqlConnect() or return undef; |
1093 | - Encode::is_utf8($sql) or $sql = decode_utf8($sql); | |
1093 | + is_utf8($sql) or $sql = decode_utf8($sql); | |
1094 | 1094 | my $rows = $self->{_dbh}->do($sql); |
1095 | 1095 | unless ($rows) { |
1096 | 1096 | unless ($sql =~ /^INSERT\s+IGNORE\b/i) { |