From 3abab315319c9265f3a848a5e431f1ac25987482 Mon Sep 17 00:00:00 2001
From: David Aspinall <da@inf.ed.ac.uk>
Date: Tue, 5 Oct 2004 21:07:03 +0000
Subject: Add pg-xml-cdata

---
 generic/pg-xml.el | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'generic/pg-xml.el')

diff --git a/generic/pg-xml.el b/generic/pg-xml.el
index 763638f0..d4f15df0 100644
--- a/generic/pg-xml.el
+++ b/generic/pg-xml.el
@@ -164,5 +164,9 @@ Output with indentation INDENT-STRING (or none if nil)."
       (funcall outputfn "/>"))))
 
 
+(defun pg-xml-cdata (str)
+  (concat "<!\\[CDATA\\[" str "\\]"))
+
+
 (provide 'pg-xml)
 ;; End of `pg-xml.el'
-- 
cgit v1.2.3