From: ivan <ivan>
Date: Sat, 7 Jun 2003 01:42:52 +0000 (+0000)
Subject: require Time::Local 1.04 on perls before 5.6
X-Git-Tag: freeside_1_4_1rc4~3^2~40
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=d5da3d1db2e73288cb15b8dbd6e3c34d54eb0faa;p=freeside.git

require Time::Local 1.04 on perls before 5.6
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index 7e2ff388e..923de00c4 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -4,6 +4,7 @@ use strict;
 use vars qw( @ISA $conf $Debug $import );
 use Safe;
 use Carp;
+BEGIN { eval "use Time::Local 1.05;" if $] < 5.006; };
 use Time::Local qw(timelocal_nocheck);
 use Date::Format;
 #use Date::Manip;