GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-10-31 14:47:27 +01:00
Code Issues Projects Releases Wiki Activity

Use binary attribute for CSV

Browse Source
This commit is contained in:
Pragmatic Software 2016-02-10 10:14:12 -08:00
parent 194bff37db
commit 7bb18e00a7
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PBot/AntiFlood.pm
View File

@ -729,7 +729,7 @@ sub check_bans {
my ($nick) = $mask =~ m/^([^!]+)/;
my %aliases = $self->{pbot}->{messagehistory}->{database}->get_also_known_as($nick);
my $csv = Text::CSV->new;
my $csv = Text::CSV->new({binary => 1});
my ($do_not_validate, $bans);
foreach my $alias (keys %aliases) {

4
PBot/MessageHistory_SQLite.pm
View File

@ -1169,7 +1169,7 @@ sub get_also_known_as {
my $nickserv_sth = $self->{dbh}->prepare('SELECT nickserv FROM Nickserv WHERE id = ?');
my $gecos_sth = $self->{dbh}->prepare('SELECT gecos FROM Gecos WHERE id = ?');
my $csv = Text::CSV->new;
my $csv = Text::CSV->new({binary => 1});
foreach my $id (keys %ids) {
$hostmask_sth->bind_param(1, $id);
@ -1329,7 +1329,7 @@ sub get_also_known_as {
return %akas;
};
$self->{pbot}->{logger}->log($@) if $@;
$self->{pbot}->{logger}->log("bad aka: $@") if $@;
return %akas;
}