LIB: improve formatting style

2015-12-18 04:24:47 +01:00
parent 94095ec28b
commit 7c84dce09f
1 changed files with 7 additions and 5 deletions
--- a/src/IO/File.hs
+++ b/src/IO/File.hs
@@ -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 ()