Update of /project/mcclim/cvsroot/mcclim In directory clnet:/tmp/cvs-serv24921
Modified Files: incremental-redisplay.lisp Log Message: Delete definitely not needed method.
--- /project/mcclim/cvsroot/mcclim/incremental-redisplay.lisp 2006/05/03 09:33:08 1.61 +++ /project/mcclim/cvsroot/mcclim/incremental-redisplay.lisp 2006/05/03 09:39:06 1.62 @@ -434,12 +434,6 @@ (let ((state (end-graphics-state record))) (setf (values (cursor-x state) (cursor-y state)) (values x y))))
-;;; XXX still needed? -(defmethod add-output-record :after - ((child updating-output-record-mixin) record) - (declare (ignore record child))) - - ;;; Prevent deleted output records from coming back from the dead. (defmethod delete-output-record :after ((child updating-output-record-mixin) record