Style tweaks
This commit is contained in:
parent
8f1ab75fe7
commit
9e87c971ab
3
Main.hs
3
Main.hs
@ -98,7 +98,8 @@ onClickedSaveButton fcb = do
|
|||||||
|
|
||||||
showErrorDialog :: String -> IO ()
|
showErrorDialog :: String -> IO ()
|
||||||
showErrorDialog str = do
|
showErrorDialog str = do
|
||||||
errorDialog <- messageDialogNew Nothing [DialogDestroyWithParent]
|
errorDialog <- messageDialogNew Nothing
|
||||||
|
[DialogDestroyWithParent]
|
||||||
MessageError
|
MessageError
|
||||||
ButtonsClose
|
ButtonsClose
|
||||||
str
|
str
|
||||||
|
Loading…
Reference in New Issue
Block a user