diff --git a/src/HSFM/GUI/Gtk/Callbacks/Utils.hs b/src/HSFM/GUI/Gtk/Callbacks/Utils.hs
index dea52cb..3ef745e 100644
--- a/src/HSFM/GUI/Gtk/Callbacks/Utils.hs
+++ b/src/HSFM/GUI/Gtk/Callbacks/Utils.hs
@@ -59,8 +59,6 @@ doFileOperation (FCopy (Copy (f':fs') to)) =
 doFileOperation (FMove (Move (f':fs') to)) =
   _doFileOperation (f':fs') to moveFileOverwrite moveFile
     $ doFileOperation (FMove $ Move fs' to)
-  where
-
 doFileOperation _ = return ()