Append this at the end:
---------------------
(catch 'out
(setq interrupt-mode 'exit)
(recursive-edit))
---------------------
Don't ask me what is it. I stole it from the code before the patch. :)Well, you can exit it by typing esc, but NOT by clicking "close" button. Thanks, Teika (Teika "Monsieur X" kazura)
