nek0/tracer
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

fix logging

Browse source
This commit is contained in:
nek0 2019-10-28 17:26:21 +01:00
parent 7c59021aee
commit 42126a972d
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/Object/Copier.hs
View file

@ -29,7 +29,8 @@ copierObjectAction dt t@ObjCopier s@"copying" ent = do
mtime <- queryMaybe objStateTime mtime <- queryMaybe objStateTime
case mtime of case mtime of
Nothing -> do Nothing -> do
liftIO $ logIO Verbose ("Copier " ++ show ent ++ ": copying!") liftIO $ logIO Verbose
("Copier " <> fromString (show ent) <> ": copying!")
return unchanged return unchanged
{ objStateTime = Set (actionTime t s) { objStateTime = Set (actionTime t s)
, objState = Set "copying" , objState = Set "copying"