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

This commit is contained in:
hasufell 2014-10-12 20:00:42 +02:00
parent 56ea542535
commit be2787103a
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020

View File

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