Commit fc27db45b3d2bf441107d54f7c3771b9d29b2282 - ilisp

Check that the ilisp-output-sink buffer exists before trying to bury it, in lisp-pop-to-buffer. I don't know why this should be necessary, and it could just be papering over the "real" bug, but the extra check avoids some "no such buffer" errors for the buffer " *Output*" (note the space). rgrjr authored 21 years ago Barak A. Pearlmutter committed 14 years ago

1 changed file(s) with 3 addition(s) and 2 deletion(s). Raw diff Collapse all Expand all

-2

ilisp-out.el less more

8	8	;;; Please refer to the file ACKNOWLEGDEMENTS for an (incomplete) list
9	9	;;; of present and past contributors.
10	10	;;;
11		;;; $Id: ilisp-out.el,v 1.14 2003/02/16 02:49:27 rgrjr Exp $
	11	;;; $Id: ilisp-out.el,v 1.15 2003/03/26 03:22:47 rgrjr Exp $
12	12
13	13	;;; Old history log.
14	14	;;;

875	875	(get-buffer-window buffer t)))
876	876	(frame (when window (window-frame window))))
877	877	(cond ((not window)
878		(when ilisp-output-sink
	878	(when (and ilisp-output-sink
	879	(get-buffer (ilisp-output-sink-buffer ilisp-output-sink)))
879	880	;; is this necessary?
880	881	(ilisp-bury-output-internal ilisp-output-sink))
881	882	(pop-to-buffer buffer))