LIB: improve formatting style

This commit is contained in:
Julian Ospald 2015-12-18 04:24:47 +01:00
parent 94095ec28b
commit 7c84dce09f
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020

View File

@ -60,11 +60,13 @@ import qualified System.Directory as SD
-- carried out via `doFile`. Useful to build up a list of operations
-- or delay operations.
data FileOperation = FCopy DTInfoZipper DTInfoZipper
| FMove FilePath FilePath
| FDelete DTInfoZipper
| FOpen DTInfoZipper
| FExecute DTInfoZipper [String]
| None
| FMove FilePath FilePath
| FDelete DTInfoZipper
| FOpen DTInfoZipper
| FExecute DTInfoZipper [String]
| None
runFileOp :: FileOperation -> IO ()