Index: openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl	5 Apr 2001 18:23:38 -0000	1.2
+++ openacs-4/packages/acs-tcl/tcl/apm-xml-procs.tcl	29 Apr 2001 02:15:11 -0000	1.3
@@ -123,7 +123,7 @@
         append spec "        <summary>[ad_quotehtml $summary]</summary>\n"
     }
     if { ![empty_string_p $release_date] } {
-        append spec "        <release-date>[ad_quotehtml $release_date]</release-date>\n"
+        append spec "        <release-date>[ad_quotehtml [string range $release_date 0 9]]</release-date>\n"
     }
     if { ![empty_string_p $vendor] || ![empty_string_p $vendor_uri] } {
         append spec "        <vendor"