/opt/alt/php56/usr/share/pear/test/File_MARC/tests
Edit: /opt/alt/php56/usr/share/pear/test/File_MARC/tests/marc_xml_16642.phpt (930B)
--TEST--
marc_xml_16642: Fix bug 16642: ensure tag and subfield values are returned as strings
--SKIPIF--
--FILE--
next()) {
foreach ($record->getFields() as $tag => $subfields) {
// Skip everything except for 650 fields
if ($tag == '650') {
print "Subject:";
foreach ($subfields->getSubfields() as $code => $value) {
print " $value";
}
print "\n";
}
}
}
?>
--EXPECT--
Subject: [a]: Arithmetic [x]: Juvenile poetry.
Subject: [a]: Children's poetry, American.
Subject: [a]: Arithmetic [x]: Poetry.
Subject: [a]: American poetry.
Subject: [a]: Visual perception.