CVS: mhonarc/MHonArc/lib mhutil.pl,2.18,2.19

Update of /cvsroot/mhonarc/mhonarc/MHonArc/lib
In directory subversions:/tmp/cvs-serv13717

Modified Files:
	mhutil.pl 
Log Message:
Minor change to fix a perl -w warning.


Index: mhutil.pl
===================================================================
RCS file: /cvsroot/mhonarc/mhonarc/MHonArc/lib/mhutil.pl,v
retrieving revision 2.18
retrieving revision 2.19
diff -C2 -r2.18 -r2.19
*** mhutil.pl	4 Aug 2002 03:47:06 -0000	2.18
--- mhutil.pl	26 Sep 2002 02:40:14 -0000	2.19
***************
*** 345,352 ****
  	$yr = (localtime(time))[5];
      }
-     $zone =~ tr/a-z/A-Z/;
  
      ## If $zone, grab gmt time, else grab local
      if ($zone) {
  	$time = &timegm($sec,$min,$hr,$mday,$mon,$yr);
  
--- 345,352 ----
  	$yr = (localtime(time))[5];
      }
  
      ## If $zone, grab gmt time, else grab local
      if ($zone) {
+ 	$zone =~ tr/a-z/A-Z/;
  	$time = &timegm($sec,$min,$hr,$mday,$mon,$yr);
  

---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-DEV