aboutsummaryrefslogtreecommitdiffstats
path: root/.irssi/scripts/ls.pl
diff options
context:
space:
mode:
Diffstat (limited to '.irssi/scripts/ls.pl')
-rw-r--r--.irssi/scripts/ls.pl40
1 files changed, 0 insertions, 40 deletions
diff --git a/.irssi/scripts/ls.pl b/.irssi/scripts/ls.pl
deleted file mode 100644
index 6481081..0000000
--- a/.irssi/scripts/ls.pl
+++ /dev/null
@@ -1,40 +0,0 @@
-use vars qw($VERSION %IRSSI);
-
-use Irssi 20020120;
-$VERSION = "0.02";
-%IRSSI = (
- authors => "c0ffee",
- contact => "c0ffee\@penguin-breeder.org",
- name => "List nicks in channel",
- description => "Use /ls <regex> to show all nicks (including ident\@host) matching regex in the current channel",
- license => "Public Domain",
- url => "http://www.penguin-breeder.org/irssi/",
- changed => "Fri Sep 06 15:36 CEST 2002",
-);
-
-
-sub cmd_ls {
- my ($data, $server, $channel) = @_;
- my @nicks;
- my $n;
- my $nick;
-
- if ($channel->{type} ne "CHANNEL") {
-
- Irssi::print("Your are not on a channel");
- return;
-
- }
-
- @nicks = $channel->nicks();
-
- foreach $nick (@nicks) {
-
- $n = $nick->{nick} . "!" . $nick->{host};
-
- $channel->print("$n") if $n =~ /$data/i;
-
- }
-}
-
-Irssi::command_bind('ls','cmd_ls');