Commit 27c575ff authored by Diederik van Arkel's avatar Diederik van Arkel

Fix ask for save:Yes being ignored bug

parent 0588974c
......@@ -377,7 +377,7 @@ where
] // not this one but continue with rest
:+: ButtonControl "Yes"
[ ControlId okId
, ControlFunction (\(ls,ps)->(Cancel,closeWindow sId ps))
, ControlFunction (\(ls,ps)->(Yes,closeWindow sId ps))
, ControlWidth buttonWidth
] // do this one and continue
)
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment