projects
/
twirssi-net-twitter-lite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
cea77b6
)
r687 - Make sure we're reading the async tweets in a unicode-safe way
author
Dan Boger
<zigdon@irc.peeron.com>
Fri, 7 Aug 2009 08:25:20 +0000
(
01:25
-0700)
committer
Dan Boger
<zigdon@irc.peeron.com>
Fri, 7 Aug 2009 08:25:20 +0000
(
01:25
-0700)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index 356660fdbbb793d46cf95302940d70ee54a170f2..1f0f895067c53f1d30a9f1512c00735aaa5f61b3 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-12,7
+12,7
@@
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "2.2.5beta";
use vars qw($VERSION %IRSSI);
$VERSION = "2.2.5beta";
-my ($REV) = '$Rev: 6
7
7 $' =~ /(\d+)/;
+my ($REV) = '$Rev: 6
8
7 $' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-21,7
+21,7
@@
my ($REV) = '$Rev: 677 $' =~ /(\d+)/;
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
- changed => '$Date: 2009-0
7-22 13:58:05 -0700 (Wed, 22 Jul
2009) $',
+ changed => '$Date: 2009-0
8-07 01:24:53 -0700 (Fri, 07 Aug
2009) $',
);
my $window;
);
my $window;
@@
-1032,6
+1032,7
@@
sub monitor_child {
# pretend
if ( open FILE, $filename ) {
# pretend
if ( open FILE, $filename ) {
+ bindmode FILE, ":utf8";
my @lines;
my %new_cache;
while (<FILE>) {
my @lines;
my %new_cache;
while (<FILE>) {