[mcclim-cvs] CVS mcclim

crhodes crhodes at common-lisp.net
Wed May 3 09:39:06 UTC 2006


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




More information about the Mcclim-cvs mailing list