[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: a listener that won't listen



At 11:04 AM 1/30/95 -0500, Bill St. Clair wrote:
>The Listener won't "Listen" unless MCL's toplevel loop is running
>to do so. Basically, you need to be inside of ccl:toplevel-loop.
>Hence, your MCL function needs to end with:
>
>(defun mcl ()
>  ...
>  (%set-toplevel 'toplevel-loop)
>  (toplevel))
>
>Likewise, the function that switches back to your application's
>menubar needs to %set-toplvel to your application's toplevel-loop
>and execute (toplevel) to install it.

Thank you for your response. I can't believe I forgot about this!

What happens if (toplevel) is not executed? I fixed my code to do a
set-toplevel, but did not do this and it seemed to work.

Martin