clean up cleanup action enumeration

This commit is contained in:
Joey Hess 2014-03-13 19:06:26 -04:00
parent 83ccce68a2
commit b63276309e
6 changed files with 29 additions and 8 deletions

16
Types/CleanupActions.hs Normal file
View file

@ -0,0 +1,16 @@
{- Enumeration of cleanup actions
-
- Copyright 2014 Joey Hess <joey@kitenet.net>
-
- Licensed under the GNU GPL version 3 or higher.
-}
module Types.CleanupActions where
import Types.UUID
data CleanupAction
= RemoteCleanup UUID
| StopHook UUID
| FsckCleanup
deriving (Eq, Ord)