diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-09 00:57:57 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-09 00:57:57 -0400 |
| commit | 335cce275afb78931416748c9e9acabb22c68f64 (patch) | |
| tree | b6f31f296792f09ebb12f50854e69fa20d44d3cd | |
| parent | 99ab46498c55c447cad1dfbe668a4b50204edea3 (diff) | |
propellor spin
| -rw-r--r-- | Propellor/Property/Scheduled.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Propellor/Property/Scheduled.hs b/Propellor/Property/Scheduled.hs index 42ff0068..2e7ae060 100644 --- a/Propellor/Property/Scheduled.hs +++ b/Propellor/Property/Scheduled.hs @@ -20,6 +20,7 @@ import qualified Data.Map as M period :: Property -> Recurrance -> Property period prop recurrance = Property desc $ do lasttime <- getLastChecked (propertyDesc prop) + print lasttime nexttime <- fmap startTime <$> nextTime schedule lasttime t <- localNow if Just t >= nexttime |