[cxml-cvs] CVS cxml/xml

[dlichteblau]

Update of /project/cxml/cvsroot/cxml/xml
In directory clnet:/tmp/cvs-serv1140/xml

Modified Files:
	sax-proxy.lisp 
Log Message:
added sax-parser-mixin to broadcast-handler


--- /project/cxml/cvsroot/cxml/xml/sax-proxy.lisp	2007/04/22 13:23:55	1.5
+++ /project/cxml/cvsroot/cxml/xml/sax-proxy.lisp	2007/05/20 09:38:35	1.6
@@ -8,7 +8,7 @@
 
 (in-package :cxml)
 
-(defclass broadcast-handler ()
+(defclass broadcast-handler (sax:sax-parser-mixin)
   ((handlers :initform nil
 	     :initarg :handlers
 	     :accessor broadcast-handler-handlers)))
@@ -59,6 +59,6 @@
   (define-proxy-method sax:entity-resolver (resolver))
   (define-proxy-method sax::dtd (dtd)))
 
-(defmethod sax:register-sax-parser :after ((handler sax-proxy) parser)
+(defmethod sax:register-sax-parser :after ((handler broadcast-handler) parser)
   (dolist (next (broadcast-handler-handlers handler))
     (sax:register-sax-parser next parser)))