diff options
| author | Joey Hess <joey@kitenet.net> | 2014-04-13 11:14:43 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-04-13 11:14:43 -0400 |
| commit | 6d1263043112d0c70ae8d76fcbc998e6d853fafa (patch) | |
| tree | 533205275f337f739c76a7cd1546888d378dc1d3 /Propellor/Property/Obnam.hs | |
| parent | 622a3d8a931979deec838f06f7fb0311adf40df6 (diff) | |
propellor spin
Diffstat (limited to 'Propellor/Property/Obnam.hs')
| -rw-r--r-- | Propellor/Property/Obnam.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Propellor/Property/Obnam.hs b/Propellor/Property/Obnam.hs index b7d34223..00e0bbef 100644 --- a/Propellor/Property/Obnam.hs +++ b/Propellor/Property/Obnam.hs @@ -72,7 +72,9 @@ restored dir params = Property (dir ++ " restored by obnam") go `requires` installed where go = ifM (liftIO needsRestore) - ( liftIO restore + ( do + warningMessage $ dir ++ " is empty/missing; restoring from backup ..." + liftIO restore , noChange ) |