window needs to be "realized" only after atoms getting set
works now.
This commit is contained in:
parent
334ad846a5
commit
440f374001
1 changed files with 3 additions and 2 deletions
|
|
@ -30,7 +30,7 @@ main = do
|
|||
, #decorated := False
|
||||
]
|
||||
|
||||
#realize win
|
||||
|
||||
Gtk.windowSetDefaultSize win 400 100
|
||||
|
||||
|
||||
|
|
@ -66,7 +66,8 @@ main = do
|
|||
pure () -- <--- important: SourceFunc expects IO Bool
|
||||
|
||||
return False -- just indicate mainContextInvokeFull call succeeded
|
||||
|
||||
|
||||
#realize win
|
||||
Gtk.widgetShow win
|
||||
|
||||
void $ applicationRun app Nothing
|
||||
|
|
|
|||
Loading…
Reference in a new issue