Synch with metadata.

InCommon · Jan 26, 2007 · 95d7e4b · 95d7e4b
1 parent a3d0433
commit 95d7e4b
Showing 1 changed file with 12 additions and 1 deletion.
diff --git a/build/addresses.pl b/build/addresses.pl
@@ -25,14 +25,25 @@
 #
 # Exclude support addresses using some XSLT magic.
 #
-#open(XML,"../xml/sdss-metadata-unsigned.xml") || die "could not open input file";
+# SDSS addresses
+#
 open(XML,"java -cp ../xalan-j_2_6_0/bin/xalan.jar org.apache.xalan.xslt.Process -IN ../xml/sdss-metadata-unsigned.xml -XSL extract_addresses.xsl|") || die "could not open input file";
 while (<XML>) {
 	if (/<EmailAddress>(mailto:)?(.*)<\/EmailAddress>/) {
 		$metadata{$2} = 1;
 	}
 }
 close XML;
+#
+# UK addresses
+#
+open(XML,"java -cp ../xalan-j_2_6_0/bin/xalan.jar org.apache.xalan.xslt.Process -IN ../xml/ukfederation-metadata-unsigned.xml -XSL extract_addresses.xsl|") || die "could not open input file";
+while (<XML>) {
+	if (/<EmailAddress>(mailto:)?(.*)<\/EmailAddress>/) {
+		$metadata{$2} = 1;
+	}
+}
+close XML;
 
 #
 # Now figure out the addresses we want to see in the mailing list.