diff options
Diffstat (limited to '')
34 files changed, 653 insertions, 0 deletions
diff --git a/debian/patches/439840-nowplaying.diff b/debian/patches/439840-nowplaying.diff new file mode 100644 index 0000000..f9b1305 --- /dev/null +++ b/debian/patches/439840-nowplaying.diff @@ -0,0 +1,16 @@ +Description: Fix multiple CRLF injection vulnerabilities in "now playing" scripts +Forwarded: not-needed +Author: Wouter Coekaerts +Last-Update: 2016-02-29 +--- a/scripts/xmms.pl ++++ b/scripts/xmms.pl +@@ -139,6 +139,9 @@ Example: /set xmms_format_time %%m minut + $format =~ s/\%$_/$fs{$_}/g; + } + ++ # remove newline characters ++ $format =~ s/[\r\n]/ /g; ++ + # sending it. + if ($server && $server->{connected} && $witem && + ($witem->{type} eq "CHANNEL" || $witem->{type} eq "QUERY")) { diff --git a/debian/patches/auto_away--trigger-also-on-newline.diff b/debian/patches/auto_away--trigger-also-on-newline.diff new file mode 100644 index 0000000..5f00b6c --- /dev/null +++ b/debian/patches/auto_away--trigger-also-on-newline.diff @@ -0,0 +1,16 @@ +Description: Trigger also on newline +Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=820412 +Forwarded: not-needed +Author: Nicolas Schier <nicolas@hjem.rpa.no> +Last-Update: 12-07-2017 +--- a/scripts/auto_away.pl ++++ b/scripts/auto_away.pl +@@ -39,7 +39,7 @@ + + sub reset_timer{ + my $key=shift; +- if($key == 10){ ++ if(($key == 10) or ($key == 13)) { + my (@servers) = Irssi::servers(); + foreach my $server (@servers) { + if($server->{usermode_away} == 1){ diff --git a/debian/patches/away.pl.diff b/debian/patches/away.pl.diff new file mode 100644 index 0000000..be81cf5 --- /dev/null +++ b/debian/patches/away.pl.diff @@ -0,0 +1,15 @@ +Description: away.pl never turns off away status on activity +Forwarded: yes +Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=505480 +Author: Norbert Buchmuller <norbi@nix.hu> +Last-Update: 12-11-2008 +--- a/scripts/away.pl ++++ b/scripts/away.pl +@@ -113,6 +113,7 @@ sub cond_unaway { + { + # come back from away + $server->command("AWAY"); ++ $am_away=0; + } + else + { diff --git a/debian/patches/beep_beep.pl.diff b/debian/patches/beep_beep.pl.diff new file mode 100644 index 0000000..d9a5d8b --- /dev/null +++ b/debian/patches/beep_beep.pl.diff @@ -0,0 +1,11 @@ +Description: Right path for perl +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/beep_beep.pl ++++ b/scripts/beep_beep.pl +@@ -1,4 +1,4 @@ +-#!/usr/bin/irssi ++#!/usr/bin/perl + # + # irssi beep replace script (tested with irssi v0.8.8.CVS (20030126-1726)) + # (C) 2002-2004 Ge0rG@IRCnet (Georg Lukas <georg@op-co.de>) diff --git a/debian/patches/bgta.pl.diff b/debian/patches/bgta.pl.diff new file mode 100644 index 0000000..2457ce4 --- /dev/null +++ b/debian/patches/bgta.pl.diff @@ -0,0 +1,11 @@ +Description: Right path for perl +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/bgta.pl ++++ b/scripts/bgta.pl +@@ -1,4 +1,4 @@ +-#!/usr/local/bin/perl ++#!/usr/bin/perl + + # BgTA SCRIPT + diff --git a/debian/patches/challenge.pl-debianize.diff b/debian/patches/challenge.pl-debianize.diff new file mode 100644 index 0000000..22d87da --- /dev/null +++ b/debian/patches/challenge.pl-debianize.diff @@ -0,0 +1,15 @@ +Description: Update copyright file +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/challenge.pl ++++ b/scripts/challenge.pl +@@ -4,8 +4,7 @@ + # + # This program is free software; you can redistribute it and/or modify + # it under the terms of the GNU General Public License as published by +-# the Free Software Foundation; either version 2 of the License, or +-# (at your option) any later version. ++# the Free Software Foundation; version 2 of the License. + # + # This program is distributed in the hope that it will be useful, + # but WITHOUT ANY WARRANTY; without even the implied warranty of diff --git a/debian/patches/cleanpublic.pl-dead-code.diff b/debian/patches/cleanpublic.pl-dead-code.diff new file mode 100644 index 0000000..8a514d5 --- /dev/null +++ b/debian/patches/cleanpublic.pl-dead-code.diff @@ -0,0 +1,19 @@ +Description: Remove dead code +Forwarded: yes +Author: Florian Ernst <florian@debian.org> +Last-Update: 2005-02-03 +--- a/scripts/cleanpublic.pl ++++ b/scripts/cleanpublic.pl +@@ -24,12 +24,6 @@ + if ($target eq $chan) { return } + } + +- # Ruthlessly_ripped_from_Garion { +- my $twin = Irssi::window_find_name($target); +- # Beam it to window 1 if we cant find any other suitable target. +- if (!defined($twin)) { $twin = Irssi::window_find_refnum(1); } +- # } +- + # Remove formatting + $data =~ s/\x03\d?\d?(,\d?\d?)?|\x02|\x1f|\x16|\x06|\x07//g; + # Let it flow diff --git a/debian/patches/colorkick.pl.diff b/debian/patches/colorkick.pl.diff new file mode 100644 index 0000000..cab1acb --- /dev/null +++ b/debian/patches/colorkick.pl.diff @@ -0,0 +1,11 @@ +Description: Right path for perl +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/colorkick.pl ++++ b/scripts/colorkick.pl +@@ -1,4 +1,4 @@ +-#!/usr/pkg/bin/perl ++#!/usr/bin/perl + # + # script what's kicking users for using color or blink + # diff --git a/debian/patches/go.pl-multiple-networks.diff b/debian/patches/go.pl-multiple-networks.diff new file mode 100644 index 0000000..5db19c6 --- /dev/null +++ b/debian/patches/go.pl-multiple-networks.diff @@ -0,0 +1,65 @@ +Description: show network name if there're channels with the same name on different networks +Forwarded: not-needed +Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=476518 +Author: Ryan Niebur <ryanryan52@gmail.com> +Last-Update: 2017-07-12 +--- a/scripts/go.pl ++++ b/scripts/go.pl +@@ -48,6 +48,48 @@ + return $re; + } + ++sub generate_the_list { ++ my $foo = {}; ++ foreach(Irssi::windows) { ++ $foo->{get_channel_name($_)} ||= 0; ++ $foo->{get_channel_name($_)} += 1; ++ } ++ return $foo; ++} ++ ++sub get_server_tag { ++ my $w = shift; ++ if(defined($w->items()) && defined($w->items()->{server}) && defined($w->items()->{server}->{tag})) { ++ return $w->items()->{server}->{tag}; ++ } else { ++ return ""; ++ } ++} ++ ++sub get_channel_name { ++ my $w = shift; ++ return $w->get_active_name(); ++} ++ ++sub get_channel_and_tag { ++ my $w = shift; ++ if(length(get_server_tag($w)) > 0) { ++ return get_channel_name($w) . '@' . get_server_tag($w); ++ } else { ++ return get_channel_name($w); # dunno how to handle this correctly...hopefully it will never come up. ++ } ++} ++ ++sub name_of_this_window { ++ my $w = shift; ++ my $list = generate_the_list(); ++ if($list->{get_channel_name($w)} > 1){ ++ return get_channel_and_tag($w); ++ } else { ++ return get_channel_name($w); ++ } ++} ++ + sub signal_complete_go { + my ($complist, $window, $word, $linestart, $want_space) = @_; + my $channel = $window->get_active_name(); +@@ -60,7 +102,7 @@ + Irssi::settings_get_bool('go_complete_anchored')); + @$complist = (); + foreach my $w (Irssi::windows) { +- my $name = $w->get_active_name(); ++ my $name = name_of_this_window($w); + if ($word ne "") { + if ($name =~ $re) { + push(@$complist, $name) diff --git a/debian/patches/hddtemp.pl.diff b/debian/patches/hddtemp.pl.diff new file mode 100644 index 0000000..7de52cf --- /dev/null +++ b/debian/patches/hddtemp.pl.diff @@ -0,0 +1,13 @@ +Description: Add a use Irssi::TextUI to hddtemp.pl, +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/hddtemp.pl ++++ b/scripts/hddtemp.pl +@@ -51,6 +51,7 @@ + use Irssi::TextUI; + use IO::Socket::INET; + use POSIX; ++use Irssi::TextUI; + + use vars qw($VERSION %IRSSI); + $VERSION = "0.15"; diff --git a/debian/patches/hilightwin.pl.diff b/debian/patches/hilightwin.pl.diff new file mode 100644 index 0000000..f6d3903 --- /dev/null +++ b/debian/patches/hilightwin.pl.diff @@ -0,0 +1,27 @@ +Description: Add patch for different hilightwin name +Forwarded: not-needed +Author: Gerfried Fuchs <rhonda@debian.org> +Last-Update: 2017-07-12 +--- a/scripts/hilightwin.pl ++++ b/scripts/hilightwin.pl +@@ -60,7 +60,7 @@ + ($dest->{level} & MSGLEVEL_NOHILIGHT) == 0 && + (!is_ignored($dest)) + ) { +- my $window = Irssi::window_find_name('hilight'); ++ my $window = Irssi::window_find_name(Irssi::settings_get_str('hilightwin_windowname')); + + if ($dest->{level} & MSGLEVEL_PUBLIC) { + $text = $dest->{target}.": ".$text; +@@ -73,8 +73,9 @@ + } + } + +-my $window = Irssi::window_find_name('hilight'); +-Irssi::print("Create a window named 'hilight'") if (!$window); ++Irssi::settings_add_str('hilightwin','hilightwin_windowname', 'hilight'); ++my $window = Irssi::window_find_name(Irssi::settings_get_str('hilightwin_windowname')); ++Irssi::print("Create a window named '" . Irssi::settings_get_str('hilightwin_windowname') . "'") if (!$window); + + Irssi::settings_add_bool('hilightwin','hilightwin_showprivmsg',1); + Irssi::settings_add_str('hilightwin', 'hilightwin_ignore_targets', ''); diff --git a/debian/patches/hostname.pl.diff b/debian/patches/hostname.pl.diff new file mode 100644 index 0000000..6427072 --- /dev/null +++ b/debian/patches/hostname.pl.diff @@ -0,0 +1,14 @@ +Description: Fix ifconfig path +Forwarded: not-needed +Last-Update: 2016-02-29 +--- a/scripts/hostname.pl ++++ b/scripts/hostname.pl +@@ -117,7 +117,7 @@ sub hostname { + sub get_addresses { + Irssi::print("Resolving IP addresses..."); + %addresses = (); +- open(IFCONFIG, "-|", "ifconfig"); ++ open(IFCONFIG, "-|", "/sbin/ifconfig"); + while (<IFCONFIG>) { + $addresses{$2} = resolve($2) + if (/(inet addr:|inet6 addr: |inet |inet6 )([0-9a-f.:]*)/ diff --git a/debian/patches/idonkey.pl.diff b/debian/patches/idonkey.pl.diff new file mode 100644 index 0000000..f98a508 --- /dev/null +++ b/debian/patches/idonkey.pl.diff @@ -0,0 +1,14 @@ +Description: "" +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/idonkey.pl ++++ b/scripts/idonkey.pl +@@ -1394,7 +1394,7 @@ + Irssi::settings_add_bool($IRSSI{name}, 'idonkey_filter_search_results', 0); + Irssi::settings_add_bool($IRSSI{name}, 'idonkey_show_chunks', 1); + +-Irssi::settings_add_str($IRSSI{name}, 'idonkey_mldonkey_cmd', 'screen mldonkey'); ++Irssi::settings_add_str($IRSSI{name}, 'idonkey_mldonkey_cmd', 'screen mldonkey_server'); + Irssi::settings_add_int($IRSSI{name}, 'idonkey_statusbar_interval', 0); + Irssi::settings_add_bool($IRSSI{name}, 'idonkey_statusbar_show_paused', 1); + Irssi::settings_add_int($IRSSI{name}, 'idonkey_update_interval', 0); diff --git a/debian/patches/listen.pl.diff b/debian/patches/listen.pl.diff new file mode 100644 index 0000000..f3d398a --- /dev/null +++ b/debian/patches/listen.pl.diff @@ -0,0 +1,19 @@ +Description: "Set PATH correctly" +Forwarded: not-needed +Author: "" +Last-Update: 2016-02-29 +--- a/scripts/listen.pl ++++ b/scripts/listen.pl +@@ -84,10 +84,10 @@ + sub getmp3proces { + # most of the players put the file into the memory at first, + # let's try to catch it there, first +- getmp3filename("lsof -d mem | grep -i .mp3"); ++ getmp3filename("/usr/bin/lsof -d mem | grep -i .mp3"); + # if we didn't find anything there, we check the fds for mp3s + if ($mp3player eq "nope") { +- getmp3filename("lsof -d 1-15 | grep -i \\.mp3"); ++ getmp3filename("/usr/bin/lsof -d 1-15 | grep -i \\.mp3"); + } + + # hmm are we listening to anything? diff --git a/debian/patches/localize.pl.diff b/debian/patches/localize.pl.diff new file mode 100644 index 0000000..2f11544 --- /dev/null +++ b/debian/patches/localize.pl.diff @@ -0,0 +1,15 @@ +Description: Fix traceroute path +Forwarded: not-needed +Author: "" +Last-Update: 2016-02-29 +--- a/scripts/localize.pl ++++ b/scripts/localize.pl +@@ -1615,7 +1615,7 @@ Irssi::signal_add('setup saved', 'save_c + Irssi::settings_add_bool($IRSSI{'name'}, 'localize_background', 1); + + Irssi::settings_add_str($IRSSI{'name'}, 'localize_cache_filename', Irssi::get_irssi_dir()."/localize_cache"); +-Irssi::settings_add_str($IRSSI{'name'}, 'localize_trace_cmd', "/usr/sbin/traceroute -q 1 -w 2 -I"); ++Irssi::settings_add_str($IRSSI{'name'}, 'localize_trace_cmd', "/usr/bin/traceroute -q 1 -w 2 -I"); + Irssi::settings_add_int($IRSSI{'name'}, 'localize_trace_distance', 3); + + Irssi::settings_add_str($IRSSI{'name'}, 'localize_auto_localize_channel_list', '.*'); diff --git a/debian/patches/mangle.pl.diff b/debian/patches/mangle.pl.diff new file mode 100644 index 0000000..4c8fab4 --- /dev/null +++ b/debian/patches/mangle.pl.diff @@ -0,0 +1,14 @@ +Description: add a use Irssi::TextUI to mangle.pl, +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/mangle.pl ++++ b/scripts/mangle.pl +@@ -11,6 +11,7 @@ + use Irssi::TextUI; + use POSIX; + use Data::Dumper; ++use Irssi::TextUI; + + use vars qw($VERSION %IRSSI %HELP %channels %translations); + $VERSION = '2019071201'; diff --git a/debian/patches/my_beep.pl.diff b/debian/patches/my_beep.pl.diff new file mode 100644 index 0000000..9a4bc9d --- /dev/null +++ b/debian/patches/my_beep.pl.diff @@ -0,0 +1,11 @@ +Description: Right path for perl +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/my_beep.pl ++++ b/scripts/my_beep.pl +@@ -1,4 +1,4 @@ +-#!/usr/bin/irssi ++#!/usr/bin/perl + # + # irssi beep with-command-script + # (C) 2003 Remco den Breeje diff --git a/debian/patches/nickident.pl.diff b/debian/patches/nickident.pl.diff new file mode 100644 index 0000000..51a5932 --- /dev/null +++ b/debian/patches/nickident.pl.diff @@ -0,0 +1,19 @@ +Description:fix nickident.pl to work with dancer-services and +fix typo in parsing ircd responses +Forwarded: not-needed +Author: The Fungi <fungi@yuggoth.org> +Last-Update: 2008-03-23 +--- a/scripts/nickident.pl ++++ b/scripts/nickident.pl +@@ -91,9 +91,9 @@ + Irssi::signal_stop(); + } elsif ($text =~ /nick, type.+msg NickServ IDENTIFY.+password.+Otherwise,|please choose a different nick./i) { + Irssi::signal_stop(); +- } elsif ($text =~ /Password accepted - you are now recognized./ || ++ } elsif ($text =~ /Password accepted - you are now recognized/ || + $text =~ /Wow, you managed to remember your password. That's a miracle by your usual standard./ || +- $text =~ /You are sucessfully identified as/ ) { ++ $text =~ /You are successfully identified as/ ) { + Irssi::print("$name: Got a positive response from $nick/" . $server->{'tag'}); + join_channels($server); + Irssi::signal_stop(); diff --git a/debian/patches/niq.pl.diff b/debian/patches/niq.pl.diff new file mode 100644 index 0000000..d9dbc53 --- /dev/null +++ b/debian/patches/niq.pl.diff @@ -0,0 +1,13 @@ +Description: add a use Irssi::TextUI to niq.pl, +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/niq.pl ++++ b/scripts/niq.pl +@@ -117,6 +117,7 @@ + use Irssi; + use Irssi::TextUI; + use strict; ++use Irssi::TextUI; + + use vars qw($VERSION %IRSSI); + diff --git a/debian/patches/openurl.pl.diff b/debian/patches/openurl.pl.diff new file mode 100644 index 0000000..faf9d88 --- /dev/null +++ b/debian/patches/openurl.pl.diff @@ -0,0 +1,15 @@ +Description: Changed hardcoded w3m to sensible-browser in openurl.pl, but ncftp and mutt remain +Forwarded: not-needed +Author: Florian Ernst <florian_ernst@gmx.net> +Last-Update: 2004-02-29 +--- a/scripts/openurl.pl ++++ b/scripts/openurl.pl +@@ -26,7 +26,7 @@ + $recent = 1; + + # RegExp & defaultcommands +-%urltypes = ( http => { regexp => qr#((?:https?://[^\s<>"]+|www\.[-a-z0-9.]+)[^\s.,;<">\):])#, cmd => 'w3m "$1"' }, ++%urltypes = ( http => { regexp => qr#((?:https?://[^\s<>"]+|www\.[-a-z0-9.]+)[^\s.,;<">\):])#, cmd => 'sensible-browser "$1"' }, + ftp => { regexp => qr#((?:ftp://[^\s<>"]+|ftp\.[-a-z0-9.]+)[^\s.,;<">\):])#, cmd => 'ncftp "$1"' }, + mail => { regexp => qr#([-_a-z0-9.]+\@[-a-z0-9.]+\.[-a-z0-9.]+)#, cmd => 'mutt "$1" -s "$2"' }, + ); diff --git a/debian/patches/queryresume.pl-use-posix.diff b/debian/patches/queryresume.pl-use-posix.diff new file mode 100644 index 0000000..bbe7eb6 --- /dev/null +++ b/debian/patches/queryresume.pl-use-posix.diff @@ -0,0 +1,31 @@ +Description: "queryresume.pl: Use POSIX.pm" +Forwarded: not-needed +Author: Christoph Berg <myon@debian.org> +Last-Update: 2016-02-29 +--- a/scripts/queryresume.pl ++++ b/scripts/queryresume.pl +@@ -10,12 +10,12 @@ $VERSION = '2003021201'; + name => 'QueryResume', + description => 'restores the last lines of a query on re-creation', + license => 'GPLv2', +- modules => 'Date::Format File::Glob', ++ modules => 'POSIX File::Glob', + changed => $VERSION, + ); + + use Irssi 20020324; +-use Date::Format; ++use POSIX qw(strftime); + use File::Glob ':glob'; + + sub draw_box ($$$$) { +@@ -41,8 +41,7 @@ sub sig_window_item_new ($$) { + $filename =~ s/\$tag\b|\$\{tag\}|\$1\b|\$\{1\}/$servertag/g; + $filename =~ s/\$0\b|\$\{0\}/$name/g; + my @lt = localtime(time); +- my $zone; +- $filename = strftime($filename, @lt, $zone); ++ $filename = strftime($filename, @lt); + $filename =~ s/(\[|\])/\\$1/g; + local *F; + open(F, "<", bsd_glob($filename)); diff --git a/debian/patches/queryresume.pl.diff b/debian/patches/queryresume.pl.diff new file mode 100644 index 0000000..27b74a5 --- /dev/null +++ b/debian/patches/queryresume.pl.diff @@ -0,0 +1,24 @@ +Description: "" +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/queryresume.pl ++++ b/scripts/queryresume.pl +@@ -32,13 +32,14 @@ + + sub sig_window_item_new ($$) { + my ($win, $witem) = @_; +- return unless (ref $witem && $witem->{type} eq 'QUERY'); ++ #return unless (ref $witem && $witem->{type} eq 'QUERY'); ++ return unless (ref $witem); + my @data; + my $filename = Irssi::settings_get_str('autolog_path'); + my $servertag = $witem->{server}->{tag}; + my $name = lc $witem->{name}; +- $filename =~ s/(\$tag|\$1)/$servertag/g; +- $filename =~ s/\$0/$name/g; ++ $filename =~ s/\$tag\b|\$\{tag\}|\$1\b|\$\{1\}/$servertag/g; ++ $filename =~ s/\$0\b|\$\{0\}/$name/g; + my @lt = localtime(time); + my $zone; + $filename = strftime($filename, @lt, $zone); diff --git a/debian/patches/rotator.pl.diff b/debian/patches/rotator.pl.diff new file mode 100644 index 0000000..4be67d3 --- /dev/null +++ b/debian/patches/rotator.pl.diff @@ -0,0 +1,14 @@ +Description: add a use Irssi::TextUI to rotator.pl, +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/rotator.pl ++++ b/scripts/rotator.pl +@@ -3,6 +3,7 @@ + use strict; + + use vars qw($VERSION %IRSSI); ++use Irssi::TextUI; + + $VERSION="0.2.1"; + %IRSSI = ( diff --git a/debian/patches/scroller.pl.diff b/debian/patches/scroller.pl.diff new file mode 100644 index 0000000..8c38886 --- /dev/null +++ b/debian/patches/scroller.pl.diff @@ -0,0 +1,14 @@ +escription: add a use Irssi::TextUI to scroller.pl, +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/scroller.pl ++++ b/scripts/scroller.pl +@@ -30,6 +30,7 @@ + use Irssi; + use Irssi::TextUI; + use strict; ++use Irssi::TextUI; + + use vars qw($VERSION %IRSSI); + diff --git a/debian/patches/series b/debian/patches/series new file mode 100644 index 0000000..0c860cb --- /dev/null +++ b/debian/patches/series @@ -0,0 +1,33 @@ +auto_away--trigger-also-on-newline.diff +nickident.pl.diff +challenge.pl-debianize.diff +away.pl.diff +beep_beep.pl.diff +bgta.pl.diff +cleanpublic.pl-dead-code.diff +colorkick.pl.diff +go.pl-multiple-networks.diff +hddtemp.pl.diff +hostname.pl.diff +idonkey.pl.diff +listen.pl.diff +localize.pl.diff +mangle.pl.diff +my_beep.pl.diff +niq.pl.diff +openurl.pl.diff +queryresume.pl.diff +queryresume.pl-use-posix.diff +rotator.pl.diff +scroller.pl.diff +stocks.pl.diff +sysinfo_dg.pl.diff +timer.pl.diff +topics.pl.diff +tvmusor.pl.diff +url.pl.diff +url_log.pl.diff +urlplot.pl.diff +xetra.pl.diff +439840-nowplaying.diff +hilightwin.pl.diff diff --git a/debian/patches/stocks.pl.diff b/debian/patches/stocks.pl.diff new file mode 100644 index 0000000..59a2345 --- /dev/null +++ b/debian/patches/stocks.pl.diff @@ -0,0 +1,20 @@ +escription: add a use Irssi::TextUI and POSIX to stocks.pl, +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/stocks.pl ++++ b/scripts/stocks.pl +@@ -1,10 +1,12 @@ +-#!/usr/bin/env perl ++#!/usr/bin/perl + + use strict; + use LWP::Simple; + use Irssi; + use vars qw($VERSION %IRSSI); + use HTML::Entities; ++use Irssi::TextUI; ++use POSIX; + + $VERSION = '0.9'; + %IRSSI = ( diff --git a/debian/patches/sysinfo_dg.pl.diff b/debian/patches/sysinfo_dg.pl.diff new file mode 100644 index 0000000..d5ffab1 --- /dev/null +++ b/debian/patches/sysinfo_dg.pl.diff @@ -0,0 +1,53 @@ +Description: "Add info to use colours and bars." +Forwarded: not-needed +Author: "Kai Hendry <hendry@cs.helsinki.fi>" +Last-Update: 2016-02-29 +--- a/scripts/sysinfo_dg.pl ++++ b/scripts/sysinfo_dg.pl +@@ -17,6 +17,46 @@ $VERSION = "1.3"; + #if you edit it and think the change is worthwhile tell me and i may add it into + #the script and credit you + ++#[Reference: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=182829] ++#There are several scripts, the ones for irssi and xchat will add a /sysinfo ++#command, the command line options talked about below are used after the ++#/sysinfo command. #The command line version can run like /exec -o ++#~/sysinfo-cmd.pl from an irc client such as epic. You could easily add /alias ++#sysinfo /exec -o ~/sysinfo-cmd.pl to get the /sysinfo command. ++# ++#The simple use is /sysinfo but there are lots more options to use ;-) ++# ++#Command options: ++# ++#Firstly there is an optional parameter that turns colours and graphs on, and ++#also lets you change them. It begins with - and the options are placed after it ++#with no spaces. ++#-cTurn colour on ++#-gTurn graphs on ++#-c??Turn colour on and sets the colour to ?? (standard irc colours) ++#-C??Sets the second colour to ?? ++#-g??Turn graphs on and sets the colour to ?? (standard irc colours) ++#-G??Sets the second graph colour to ?? ++# ++#Examples: ++#-g Turns graphs on with no colour ++#-cg Turns colour and graphs on ++#-c2C12g12G2 Does a nice blue colour scheme ++# ++#After the options you can tell it what type of information to display, there ++#are several types set or you can put the names of the sections you want to ++#display. ++# ++#The default names are: std, bigger, full, net, uptime, use. ++#The section names are: host, os, up, cpu, cache, mem, users, load, procs, swap, ++#disk, video, ethernet and also the name of any network devices (eth0, ppp0 for ++#example). ++# ++#Examples: ++#/sysinfo bigger ++#/sysinfo -c2C12g12G2 os up cpu mem disk ++#/sysinfo -g use ++ + use vars qw/$colour $graphs $graphs2 $colour2 $style/; + Irssi::command_bind("sysinfo","sysinfo"); + diff --git a/debian/patches/timer.pl.diff b/debian/patches/timer.pl.diff new file mode 100644 index 0000000..2b572fc --- /dev/null +++ b/debian/patches/timer.pl.diff @@ -0,0 +1,21 @@ +Description: "timer.pl: add repeat rate to /timer list" +Forwarded: not-needed +Author: "Christoph Berg <myon@debian.org>" +Last-Update: 2006-07-22 +--- a/scripts/timer.pl ++++ b/scripts/timer.pl +@@ -144,11 +144,12 @@ + command_bind 'timer list' => sub { + print( CRAP "Active timers:" ); + foreach my $name ( keys %timers ) { ++ my $msg = "$name = $timers{$name}->{'command'} every $timers{$name}->{'interval'}s"; + if ( $timers{$name}->{repeat} == -1 ) { +- print( CRAP "$name = $timers{$name}->{'command'} (until stopped)"); ++ print( CRAP "$msg (until stopped)"); + } + else { +- print( CRAP "$name = $timers{$name}->{'command'} ($timers{$name}->{'repeat'} repeats left)" ); ++ print( CRAP "$msg ($timers{$name}->{'repeat'} repeats left)" ); + } + } + print( CRAP "End of /timer list" ); diff --git a/debian/patches/topics.pl.diff b/debian/patches/topics.pl.diff new file mode 100644 index 0000000..02ada07 --- /dev/null +++ b/debian/patches/topics.pl.diff @@ -0,0 +1,19 @@ +Description: topics.pl: show real time instead of epoch, remove quotes +Forwarded: not-needed +Author: Christoph Berg <myon@debian.org> +Last-Update: 2006-07-22 +--- a/scripts/topics.pl ++++ b/scripts/topics.pl +@@ -104,10 +104,10 @@ + my $i = 0; + my $text; + foreach (@{$topics{$ircnet}{$name}{list}}) { +- $text .= "%r[".$i."]%n ".$_->{topic_time}." (by ".$_->{topic_by}.")\n"; ++ $text .= "%r[$i]%n ".scalar(localtime($_->{topic_time}))." ".$_->{topic_by}."\n"; + my $topic = $_->{topic}; + $topic =~ s/%/%%/g; +- $text .= ' "'.$topic.'"'."\n"; ++ $text .= " $topic\n"; + $i++; + } + $witem->print($_, MSGLEVEL_CLIENTCRAP) foreach (split(/\n/, draw_box('Topics', $text, $name, 1))); diff --git a/debian/patches/tvmusor.pl.diff b/debian/patches/tvmusor.pl.diff new file mode 100644 index 0000000..1b384ef --- /dev/null +++ b/debian/patches/tvmusor.pl.diff @@ -0,0 +1,11 @@ +Description: Right path for perl +Forwarded: not-needed +Last-Update: 2010-05-12 +--- a/scripts/tvmusor.pl ++++ b/scripts/tvmusor.pl +@@ -1,4 +1,4 @@ +-#!/usr/pkg/bin/perl ++#!/usr/bin/perl + # + # $Id: porthu-irssi.pl,v 1.7 2003/06/14 21:14:46 bigmac Exp $ + # diff --git a/debian/patches/url.pl.diff b/debian/patches/url.pl.diff new file mode 100644 index 0000000..63658ab --- /dev/null +++ b/debian/patches/url.pl.diff @@ -0,0 +1,15 @@ +Description: "" +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/url.pl ++++ b/scripts/url.pl +@@ -321,7 +321,7 @@ + Irssi::settings_add_str('lookandfeel', 'url_color', '12'); + Irssi::settings_add_bool('misc', 'url_redundant', 0); + Irssi::settings_add_str('misc', 'browse_command', +- 'galeon-wrapper %u >/dev/null &'); ++ 'sensible-browser %u >/dev/null &'); + Irssi::settings_add_str('misc', 'url_file', '~/.irc_url_list.html'); + + Irssi::signal_add('print text', \&print_text); diff --git a/debian/patches/url_log.pl.diff b/debian/patches/url_log.pl.diff new file mode 100644 index 0000000..4fd3080 --- /dev/null +++ b/debian/patches/url_log.pl.diff @@ -0,0 +1,15 @@ +Description: "" +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/url_log.pl ++++ b/scripts/url_log.pl +@@ -383,7 +383,7 @@ + Irssi::settings_add_str("url_log", "url_log_file", "~/.irssi/url"); + Irssi::settings_add_str("url_log", "url_log_timestamp_format", '%c'); + Irssi::settings_add_str("url_log", "url_log_format", '%s %n %t %u'); +-Irssi::settings_add_str("url_log", "url_log_browser", 'galeon -n -x %f > /dev/null'); ++Irssi::settings_add_str("url_log", "url_log_browser", 'sensible-browser %f > /dev/null'); + Irssi::settings_add_int("url_log", "url_log_size", 25); + Irssi::settings_add_str("url_log", "url_auto_head_format", '%c %t %l bytes'); + Irssi::settings_add_str("url_log", "url_head_format", ' diff --git a/debian/patches/urlplot.pl.diff b/debian/patches/urlplot.pl.diff new file mode 100644 index 0000000..ac189d8 --- /dev/null +++ b/debian/patches/urlplot.pl.diff @@ -0,0 +1,15 @@ +Description: "" +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/urlplot.pl ++++ b/scripts/urlplot.pl +@@ -264,7 +264,7 @@ + + # Defaults + sub DEF_URL_COMMAND() { +- 'mozilla -remote "openURL(__URL__)" > /dev/null 2>&1 || mozilla "__URL__"&' } ++ 'sensible-browser __URL__ > /dev/null 2>&1' } + sub DEF_URL_CACHE_MAX() { 90 } + sub DEF_URL_LOG_FILE_AUTORELOAD_TIME() { 120 } + sub DEF_URL_TIME_FORMAT() { '%Y:%m:%d - %H:%M:%S' } diff --git a/debian/patches/xetra.pl.diff b/debian/patches/xetra.pl.diff new file mode 100644 index 0000000..f6044c2 --- /dev/null +++ b/debian/patches/xetra.pl.diff @@ -0,0 +1,15 @@ +Description: add a use Data::Dumper and POSIX +Forwarded: not-needed +Author: "" +Last-Update: 2010-05-12 +--- a/scripts/xetra.pl ++++ b/scripts/xetra.pl +@@ -18,6 +18,8 @@ + use Irssi 20020324; + use Irssi::TextUI; + use LWP::Simple; ++use Data::Dumper; ++use POSIX; + use vars qw($forked @ticker $shift $timer); + + sub draw_box ($$$$) { |