[cl-soap-cvs] CVS update: cl-soap/src/xsd.lisp

[Sven Van Caekenberghe]

Update of /project/cl-soap/cvsroot/cl-soap/src
In directory common-lisp.net:/tmp/cvs-serv21182/src

Modified Files:
	xsd.lisp 
Log Message:
fixed a typo

Date: Wed Sep 28 11:00:54 2005
Author: scaekenberghe

Index: cl-soap/src/xsd.lisp
diff -u cl-soap/src/xsd.lisp:1.17 cl-soap/src/xsd.lisp:1.18
--- cl-soap/src/xsd.lisp:1.17	Tue Sep 27 20:22:53 2005
+++ cl-soap/src/xsd.lisp	Wed Sep 28 11:00:51 2005
@@ -1,6 +1,6 @@
 ;;;; -*- mode: lisp -*-
 ;;;;
-;;;; $Id: xsd.lisp,v 1.17 2005/09/27 18:22:53 scaekenberghe Exp $
+;;;; $Id: xsd.lisp,v 1.18 2005/09/28 09:00:51 scaekenberghe Exp $
 ;;;;
 ;;;; A partial implementation of the XML Schema Definition standard
 ;;;;
@@ -529,7 +529,7 @@
                     (member-type (get-type member)))
                 (indent level stream)
                 (if (xsd-primitive-type-name-p member-type)
-                    (format stream "  Member ~s of primitive type ~s[ ~a]~@[ nillable~]~%" 
+                    (format stream "  Member ~s of primitive type ~s [~a]~@[ nillable~]~%" 
                             member-name member-type (describe-multiplicity member) (get-nillable member)) 
                   (progn
                     (format stream "  Member ~s [~a]~@[ nillable~]~%" member-name