From 1ecf6f4751a33e72d4ef2f57edbd1038fdee74c8 Mon Sep 17 00:00:00 2001 From: William Heimbigner Date: Thu, 26 Jan 2012 07:26:25 +0000 Subject: fix a misplaced comment and added a useless function --- modules/util.pl | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) (limited to 'modules') diff --git a/modules/util.pl b/modules/util.pl index 2fa175f..0a5c6c4 100644 --- a/modules/util.pl +++ b/modules/util.pl @@ -17,6 +17,9 @@ my %oq; 'opalert'=> 9001 #OVER NINE THOUSAND!!! ); +#leaves room for more levels if for some reason we end up needing more +#theoretically, you should be able to change those numbers without any damage + %::COLORS = ( 'white' => '00', @@ -54,9 +57,6 @@ sub new return $self; } -#leaves room for more levels if for some reason we end up needing more -#theoretically, you should be able to change those numbers without any damage - sub maxlen { my ($a, $b) = @_; my ($la, $lb) = (length($a), length($b)); @@ -204,4 +204,9 @@ sub seq { return ($n1 eq $n2); } +sub dprint { + my ($module, $text) = @_; + print $text if $::debug; +} + return 1; -- cgit v1.2.3