From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Tue, 6 May 2003 22:00:42 +0000 (+0000)
Subject: r4859: Auto commit for Debian build
X-Git-Tag: debian-2.11.0-2~94
X-Git-Url: http://git.kpe.io/?p=hyperobject.git;a=commitdiff_plain;h=4d225e15f8584af88ef2c061b2cc245c1d4b5912

r4859: Auto commit for Debian build
---

diff --git a/debian/changelog b/debian/changelog
index 6ba7b3c..d2189f6 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+cl-hyperobject (2.7.1-1) unstable; urgency=low
+
+  * New upstream
+
+ -- Kevin M. Rosenberg <kmr@debian.org>  Tue,  6 May 2003 16:00:11 -0600
+
 cl-hyperobject (2.7.0-1) unstable; urgency=low
 
   * Add regression testing
diff --git a/views.lisp b/views.lisp
index 4226fbc..37d6ad4 100644
--- a/views.lisp
+++ b/views.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: views.lisp,v 1.27 2003/04/16 19:35:35 kevin Exp $
+;;;; $Id: views.lisp,v 1.28 2003/05/06 22:00:42 kevin Exp $
 ;;;;
 ;;;; This file is Copyright (c) 2000-2002 by Kevin M. Rosenberg
 ;;;;
@@ -263,6 +263,7 @@
 			   :xhtml-link-labels :xml-link-labels :ie-xml-link
 			   :ie-xml-link-labels)
 		       (or print-formatter
+			   (string-equal (write-to-string type) "cdata")
 			   (string-equal (write-to-string type) "string")))
 	      (setq func `(kmrcl:xml-cdata ,func)))
 	    (push func value-func))