Update of /project/mcclim/cvsroot/mcclim/Apps/Inspector In directory cl-net:/tmp/cvs-serv11274/Apps/Inspector
Modified Files: inspector.lisp Log Message: Fit space requirements to output history bounding rectangle automatically after redisplay and drawing of graphs/tables.
--- /project/mcclim/cvsroot/mcclim/Apps/Inspector/inspector.lisp 2008/02/11 22:51:42 1.44 +++ /project/mcclim/cvsroot/mcclim/Apps/Inspector/inspector.lisp 2008/11/09 19:58:26 1.45 @@ -71,14 +71,6 @@ (- (bounding-rectangle-height scrollable-pane) (bounding-rectangle-height viewport)))))))
-(defmethod redisplay-frame-pane :after ((frame inspector) - (pane application-pane) - &key force-p) - (declare (ignore force-p)) - (change-space-requirements - pane - :height (bounding-rectangle-height (stream-output-history pane)))) - (defun inspector (obj &key (new-process nil)) (flet ((run () (let ((*print-length* 10)