[open-ils-commits] r17242 - trunk/Open-ILS/src/perlmods/OpenILS/WWW (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2010-08-18 12:00:41 -0400 (Wed, 18 Aug 2010)
New Revision: 17242

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
Log:
Give authority records an XML-valid XML formats list

Still need to trim the actual list of formats for authority records,
as marcxml-full and marcxml-uris get listed, and those do not work
or make sense for authority records.


Modified: trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2010-08-18 15:57:24 UTC (rev 17241)
+++ trunk/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2010-08-18 16:00:41 UTC (rev 17242)
@@ -397,6 +397,10 @@
 				<formats id='$uri'>
 					<format name='opac' type='text/html'/>
 				FORMATS
+			} else {
+				$body .= <<"				FORMATS";
+				<formats id='$uri'>
+				FORMATS
 			}
 
 			for my $h (@$list) {