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:
2a7a572
)
r675 - Add patch from @abesto to improve unicode support
author
Dan Boger
<zigdon@irc.peeron.com>
Wed, 22 Jul 2009 17:07:45 +0000
(10:07 -0700)
committer
Dan Boger
<zigdon@irc.peeron.com>
Wed, 22 Jul 2009 17:07:45 +0000
(10:07 -0700)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index daa01af72705b08ef33cbb0801158c176aa49000..3496cfcdd9a623be6b4ad63a4f2304758d3df956 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-6,12
+6,13
@@
use HTML::Entities;
use File::Temp;
use LWP::Simple;
use Data::Dumper;
use File::Temp;
use LWP::Simple;
use Data::Dumper;
+use Encode;
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "2.2.5beta";
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "2.2.5beta";
-my ($REV) = '$Rev: 67
3
$' =~ /(\d+)/;
+my ($REV) = '$Rev: 67
5
$' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-20,7
+21,7
@@
my ($REV) = '$Rev: 673 $' =~ /(\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-07-
16 16:50:30 -0700 (Thu, 16
Jul 2009) $',
+ changed => '$Date: 2009-07-
22 10:06:58 -0700 (Wed, 22
Jul 2009) $',
);
my $window;
);
my $window;
@@
-1430,7
+1431,7
@@
sub shorten {
}
}
}
}
- return $data;
+ return
decode "utf8",
$data;
}
sub normalize_username {
}
sub normalize_username {