diff options
Diffstat (limited to 'BackupLog.hs')
-rw-r--r-- | BackupLog.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/BackupLog.hs b/BackupLog.hs index 70ec699..5ea7ba9 100644 --- a/BackupLog.hs +++ b/BackupLog.hs @@ -20,7 +20,10 @@ import System.Directory import System.Posix.Files import qualified Data.ByteString.Lazy as B -data BackupLog = BackupLog POSIXTime BackupEvent +data BackupLog = BackupLog + { logDate :: POSIXTime + , logEvent :: BackupEvent + } deriving (Show, Generic) instance ToJSON BackupLog |