[interchange-cvs] interchange - heins modified lib/Vend/Cron.pm
interchange-cvs at icdevgroup.org
interchange-cvs at icdevgroup.org
Mon Nov 28 23:33:41 EST 2005
User: heins
Date: 2005-11-29 04:33:41 GMT
Modified: lib/Vend Cron.pm
Log:
* Duh -- put qualifying code in eval block. And test -- verified works
properly without cron call and warns when HouseKeepingCron is called.
Revision Changes Path
2.4 +4 -2 interchange/lib/Vend/Cron.pm
rev 2.4, prev_rev 2.3
Index: Cron.pm
===================================================================
RCS file: /var/cvs/interchange/lib/Vend/Cron.pm,v
retrieving revision 2.3
retrieving revision 2.4
diff -u -r2.3 -r2.4
--- Cron.pm 29 Nov 2005 02:19:07 -0000 2.3
+++ Cron.pm 29 Nov 2005 04:33:41 -0000 2.4
@@ -1,6 +1,6 @@
# Vend::Cron - Determine tasks to run based on time
#
-# $Id: Cron.pm,v 2.3 2005/11/29 02:19:07 mheins Exp $
+# $Id: Cron.pm,v 2.4 2005/11/29 04:33:41 mheins Exp $
#
# Copyright (C) 2002-2005 Interchange Development Group
#
@@ -22,7 +22,7 @@
package Vend::Cron;
use vars qw($VERSION);
-$VERSION = substr(q$Revision: 2.3 $, 10);
+$VERSION = substr(q$Revision: 2.4 $, 10);
use POSIX qw(strftime);
use Vend::Util;
@@ -32,9 +32,11 @@
no warnings qw(uninitialized);
BEGIN {
+ eval {
require Set::Crontab;
import Set::Crontab;
$Vend::Cron::Loaded = 1;
+ };
}
my @periods = (
More information about the interchange-cvs
mailing list