Style

2014-10-10 17:40:25 +02:00
parent 6e4c7e47c2
commit 954b104642
2 changed files with 2 additions and 1 deletions
--- a/GUI/Gtk.hs
+++ b/GUI/Gtk.hs
@@ -261,6 +261,7 @@ saveDiag' fp mygui =
        yD = (,)         <$>
          readMaybe ylD' <*>
          readMaybe yuD' :: Maybe (Double, Double)
+
      case (xD, yD) of
        (Just xD', Just yD') -> do
          renderCairo "out.svg"