From: Tomasz Konojacki <redacted>
Date: Sun, 17 Sep 2017 03:55:25 +0000 (+0200)
Subject: ls.pl: minor style fixes
X-Git-Url: http://git.99rst.org/?a=commitdiff_plain;h=ee935d1387163b666a34358e50d40ce90e77461b;p=irssi-scripts.irssi.org.git

ls.pl: minor style fixes
---

diff --git a/scripts/ls.pl b/scripts/ls.pl
index 4bdce13..7af5e4e 100644
--- a/scripts/ls.pl
+++ b/scripts/ls.pl
@@ -15,25 +15,19 @@ $VERSION = "0.02";
 
 sub cmd_ls {
 	my ($data, $server, $channel) = @_;
-	my @nicks;
-	my $n;
-	my $nick;
 
 	if ($channel->{type} ne "CHANNEL") {
+		Irssi::print("You are not on a channel");
 
-		Irssi::print("Your are not on a channel");
 		return;
-
 	}
 
-	@nicks = $channel->nicks();
-
-	foreach $nick (@nicks) {
+	my @nicks = $channel->nicks();
 
-		$n = $nick->{nick} . "!" . $nick->{host};
+	foreach my $nick (@nicks) {
+		my $n = $nick->{nick} . "!" . $nick->{host};
 
 		$channel->print("$n") if $n =~ /$data/i;
-		
 	}
 }