Bug fix for Extended Apropos

[mcw@cs.rice.edu (Michael Wirth)]

Guillaume Cartier's extended apropos (apropos.sit.hqx in the Cambridge MCL2
contrib archive) is neat.  Try it out.

However, if you load it, use it even once, save the application, and then start
up the new application and atttempt to open an apropos window, it will die
with dead Mac pointers.  Cause:  The *apropos* variable saves a copy of
an "extended apropos" object, which contains a window pointer as well as
several other Mac pointers.

Solution:  In the file Apropos.lisp, right after the line:
	(defvar *apropos* nil)
insert the two lines:
	(defun init-*apropos* () (setq *apropos* nil))
	(push 'init-*apropos* *save-exit-functions*)

This will cause *apropos* to be cleared when the application is saved.

Thanks, Guillaume.

Michael C. Wirth
Petroleum Information Corp.
4150 Westheimer Rd.
Houston, TX  77027
713-961-5660 (voice)
713-961-7917 (fax)
mcw@cs.rice.edu