diff --git a/src/HSFM-GUI-Gtk-MyView.html b/src/HSFM-GUI-Gtk-MyView.html
index cd7f609..4f48e6f 100644
--- a/src/HSFM-GUI-Gtk-MyView.html
+++ b/src/HSFM-GUI-Gtk-MyView.html
@@ -117,11 +117,11 @@
notebookSetTabReorderable (notebook mygui) (viewBox myview) True
catchIOError (refreshView mygui myview item) $ \e -> do
- unless (isUserError e) (ioError e)
- file <- readFile getFileInfo . fromJust . P.parseAbs . fromString
- $ "/"
- refreshView mygui myview file
- labelSetText label (fromString "/" :: String)
+ file <- readFile getFileInfo . fromJust . P.parseAbs . fromString
+ $ "/"
+ refreshView mygui myview file
+ labelSetText label (fromString "/" :: String)
+ unless (isUserError e) (ioError e)
_ <- ebox `on` buttonPressEvent $ do