From 3ad48471cdaec8059be4945606d97c019f2e4ce0 Mon Sep 17 00:00:00 2001 From: William Heimbigner Date: Fri, 25 Dec 2015 21:52:37 +0400 Subject: General code cleanup (removing unused functions / old commented out code / etc.) --- lib/ASM/Event.pm | 16 ---------------- 1 file changed, 16 deletions(-) (limited to 'lib/ASM/Event.pm') diff --git a/lib/ASM/Event.pm b/lib/ASM/Event.pm index 470056c..04046c4 100644 --- a/lib/ASM/Event.pm +++ b/lib/ASM/Event.pm @@ -3,27 +3,11 @@ use warnings; use strict; use Data::Dumper; -use Text::LevenshteinXS qw(distance); use IO::All; use POSIX qw(strftime); use Regexp::Wildcards; use HTTP::Request; -sub cs { - my ($chan) = @_; - $chan = lc $chan; - $chan =~ s/^[@+]//; - return $::channels->{channel}->{$chan} if ( defined($::channels->{channel}->{$chan}) ); - return $::channels->{channel}->{default}; -} - -sub maxlen { - my ($a, $b) = @_; - my ($la, $lb) = (length($a), length($b)); - return $la if ($la > $lb); - return $lb; -} - sub new { my $module = shift; -- cgit v1.2.3