diff options
| author | Geert Hauwaerts | 2014-11-26 22:02:41 +0100 |
|---|---|---|
| committer | Geert Hauwaerts | 2014-11-26 22:02:41 +0100 |
| commit | f460d1e39ac65f2a2c21f0c88aa45e9cd4217520 (patch) | |
| tree | 4c73c1da13250a2e865adc3e473893c7585134f1 /scripts | |
| parent | d967ffe44c7707698829083f9c61274e02371adb (diff) | |
| parent | 840fb2565fe2b912d2077f6c2c62a12e517c8c66 (diff) | |
| download | scripts.irssi.org-f460d1e39ac65f2a2c21f0c88aa45e9cd4217520.tar.bz2 | |
Merge pull request #91 from michalrus/utf8-rainbow
Support UTF-8 in rainbow.pl
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/rainbow.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/scripts/rainbow.pl b/scripts/rainbow.pl index 3fc2375..4b0361b 100644 --- a/scripts/rainbow.pl +++ b/scripts/rainbow.pl @@ -20,7 +20,7 @@ use strict; use vars qw($VERSION %IRSSI); -$VERSION = "1.4"; +$VERSION = "1.5"; %IRSSI = ( authors => 'Jakub Jankowski', contact => 'shasta@atn.pl', @@ -47,6 +47,7 @@ my @colors = ('0', '4', '8', '9', '11', '12', '13'); # returns random-coloured string sub make_colors { my ($string) = @_; + Encode::_utf8_on($string); my $newstr = ""; my $last = 255; my $color = 0; @@ -144,3 +145,4 @@ Irssi::command_bind("rkick", "rkick"); # 29.01.2002: /rsay works with dcc chats now (v1.2) # 02.02.2002: make_colors() doesn't assign any color to spaces (v1.3) # 23.02.2002: /rkick added +# 26.11.2014: utf-8 support |