Update of /project/mcclim/cvsroot/mcclim/Backends/beagle/windowing In directory common-lisp.net:/tmp/cvs-serv19755/beagle/windowing
Modified Files: port.lisp Log Message: Add auto release pool to function that creates the event loop to stop OS X barking all the time.
Date: Tue May 17 19:56:20 2005 Author: drose
Index: mcclim/Backends/beagle/windowing/port.lisp diff -u mcclim/Backends/beagle/windowing/port.lisp:1.2 mcclim/Backends/beagle/windowing/port.lisp:1.3 --- mcclim/Backends/beagle/windowing/port.lisp:1.2 Tue May 17 19:51:15 2005 +++ mcclim/Backends/beagle/windowing/port.lisp Tue May 17 19:56:20 2005 @@ -159,6 +159,7 @@ (setf (port-event-process port) (clim-sys:make-process (lambda () + (ccl::create-autorelease-pool) (loop (with-simple-restart (restart-event-loop "Restart CLIM's event loop.")