summaryrefslogtreecommitdiffstats
path: root/lib/ASM/Log.pm
diff options
context:
space:
mode:
authorLibravatarDoug Freed <dwfreed@mtu.edu>2016-02-09 18:36:15 -0700
committerLibravatarDoug Freed <dwfreed@mtu.edu>2016-02-09 18:36:15 -0700
commit0f7bf2bf5370e2b45d228ec10ca15020c5c2fa07 (patch)
treeba4ef8c0e8d1d2ae50891184529caf85e4a01829 /lib/ASM/Log.pm
parentcfa47b2ecd2f4ddca3a4719f33a3d50aee94614a (diff)
Clean up excessive use of lc
Diffstat (limited to 'lib/ASM/Log.pm')
-rw-r--r--lib/ASM/Log.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/ASM/Log.pm b/lib/ASM/Log.pm
index ef204f0..adeb4f2 100644
--- a/lib/ASM/Log.pm
+++ b/lib/ASM/Log.pm
@@ -116,10 +116,11 @@ sub logg
print "COULDN'T PRINT TO $path - $line";
}
my $spy;
+ my $nick = lc $event->{nick};
if (defined($::spy{$chan})) {
$spy = $::spy{$chan};
- } elsif (defined($::spy{lc $event->{nick}})) {
- $spy = $::spy{lc $event->{nick}};
+ } elsif (defined($::spy{$nick})) {
+ $spy = $::spy{$nick};
}
if (defined($spy)) {
say $spy "$chan: $nostamp";