diff options
| author | dx | 2015-12-03 20:47:38 -0300 |
|---|---|---|
| committer | dx | 2015-12-03 20:47:38 -0300 |
| commit | 46a13296cebd89713419fd6e9929bf28d50fb1d9 (patch) | |
| tree | 35db39a3c868f48127fb20b5bf35bbf15ba495a1 | |
| parent | 9bd43f6851f31b1bfef10f9b1d1bd314dad58587 (diff) | |
| parent | 26c0c161180738a8a56d92b573b131b528b283ec (diff) | |
| download | scripts.irssi.org-46a13296cebd89713419fd6e9929bf28d50fb1d9.tar.bz2 | |
Merge pull request #199 from ailin-nemui/linebuffer
linebuffer 0.3
| -rw-r--r-- | scripts/linebuffer.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/linebuffer.pl b/scripts/linebuffer.pl index 9e002bb..c0f29db 100644 --- a/scripts/linebuffer.pl +++ b/scripts/linebuffer.pl @@ -3,7 +3,7 @@ use warnings; use Irssi; use Irssi::TextUI; use Hash::Util qw(); -our $VERSION = '0.2'; # c1eddc6a0d6385a +our $VERSION = '0.3'; # 8a7f8770be646c3 our %IRSSI = ( authors => 'Nei', contact => 'Nei @ anti@conference.jabber.teamidiot.de', @@ -109,7 +109,7 @@ HELP my ($sig, $chr) = @_; my ($bg, $off) = @{ $ext_color_off{$sig} }; my $color = $off - 0x3f + ord $chr; - $color += 10 if $color > 213; + $color += 10 if $color > 214; ($bg ? 'x' : 'X') . (1+int($color / 36)) . $ext_color_al[$color % 36]; }; sub control2format { |