On Dec 31, 2007 6:34 PM, ahefner ahefner@common-lisp.net wrote:
- (flet ((run () (run-frame-top-level frame)))
- (flet ((run ()
(unwind-protect (run-frame-top-level frame)
(disown-frame fm frame)))) (if new-process (values (clim-sys:make-process #'run :name process-name) frame)
In case this bug has propagated into the run-<program> functions of any other apps, it is necessary to call disown-frame yourself if you pass a frame manager to make-application-frame. Since I've also fixed the buffering problem with disable-frame, you won't notice that you failed to, but the unmapped window will linger instead of being destroyed.