GUI: don't show error dialogs if there hasn't been any file chosen

This commit is contained in:
2014-10-12 20:00:42 +02:00
parent 56ea542535
commit be2787103a

View File

@@ -169,7 +169,7 @@ drawDiag mygui = do
1 -> showErrorDialog "No valid x/y dimensions!"
2 -> showErrorDialog "No valid Mesh file!"
_ -> return ()
Nothing -> showErrorDialog "No valid Mesh file!"
Nothing -> return ()
-- |Saves a Diagram which is built from a given file as an SVG.
@@ -184,7 +184,7 @@ saveDiag mygui = do
1 -> showErrorDialog "No valid x/y dimensions!"
2 -> showErrorDialog "No valid Mesh file!"
_ -> return ()
Nothing -> showErrorDialog "No valid Mesh file!"
Nothing -> return ()
-- |Draws and saves a Diagram which is built from a given file.