inform bug
[1/1] from: rotenca::telvia::it at: 1-Oct-2001 14:17
Inform has a bug in the /timeout refinement: it does not close the popup
window.
My patch:
inform: func [
{Display an exclusive focus panel for alerts, dialogs, and requestors.}
panel [object!]
/offset where [pair!] "Offset of panel"
/timeout time
][
panel/text: copy "Dialog"
panel/offset: either offset [where]
[system/view/screen-face/size - panel/size / 2]
show-popup panel
either time [wait time hide-popup] [do-events]
] ^^^^^^^^^^^^^
---
Ciao
Romano