From 7fa3307ec8d366d411b8401c6d9b24d43548e642 Mon Sep 17 00:00:00 2001 From: dlichteblau Date: Sun, 20 May 2007 09:38:35 +0000 Subject: [PATCH] added sax-parser-mixin to broadcast-handler --- xml/sax-proxy.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/xml/sax-proxy.lisp b/xml/sax-proxy.lisp index bd1d18c..7b91087 100644 --- a/xml/sax-proxy.lisp +++ b/xml/sax-proxy.lisp @@ -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)))