pdate :: Repo -> [SHA] -> Queue Bool
update repo commits = liftF (Update repo commits id)

update :: Repo -> [SHA] -> Queue Bool
update repo commits = liftF (Update repo commits id)
update repo commits = liftF (Update repo commits id)