From e59093be7619f969c9e935d3de539e7432286942 Mon Sep 17 00:00:00 2001 From: David Phillips Date: Wed, 1 Aug 2018 12:06:36 +1200 Subject: Timezone: Implement case insensitivity Merges GitHub #14 --- Plugin/Timezone.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'Plugin/Timezone.pm') diff --git a/Plugin/Timezone.pm b/Plugin/Timezone.pm index 6dcd0c0..a536ed6 100644 --- a/Plugin/Timezone.pm +++ b/Plugin/Timezone.pm @@ -29,9 +29,10 @@ sub time { return "Syntax: time [nick]" unless @arguments == 1; my $nick = $arguments[0]; - if (grep {$_ =~ /^$nick$/i} @known_zones) { + my ($case_nick) = grep {/^$nick$/i} @known_zones; + if ($case_nick) { my $d = DateTime->now(); - $d->set_time_zone($config{timezone}->{$nick}); + $d->set_time_zone($config{timezone}->{$case_nick}); my $timestr = $d->strftime("%Y-%m-%d %H:%M %Z"); return "$requester: $nick\'s clock reads $timestr"; } else { -- cgit v1.1