scheduleCleanupFiles :: (TS m, Job.HasFiles a) => a -> m ()
scheduleCleanupFiles a = do
    let fs = a ^.. Job.files . each
    unless (null fs) . ES.schedule $ CleanupFiles fs
scheduleCleanupFiles :: (TS m, Job.HasFiles a) => a -> m ()
scheduleCleanupFiles a = do
    let fs = a ^.. Job.files . each
    unless (null fs) . ES.schedule $ CleanupFiles fs
scheduleCleanupFiles a = do
    let fs = a ^.. Job.files . each
    unless (null fs) . ES.schedule $ CleanupFiles fs