From ccd3ad3cdb32e053fd6655ea7340466eecf5f0ff Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Thu, 6 May 2010 14:12:35 -0400 Subject: [PATCH] update test case Thanks to Sue Hopkins for the catch. Signed-off-by: Galen Charlton --- Equinox-Migration/t/03-MapDrivenMARCXMLProc.t | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t b/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t index e4a06a8..bf4bb2c 100644 --- a/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t +++ b/Equinox-Migration/t/03-MapDrivenMARCXMLProc.t @@ -96,7 +96,7 @@ is ($rec->{tags}[0]{tag}, 999, '250 doesnt exist in this record'); is ($rec->{tags}[0]{uni}{a}, "FIC DEV", 'subfield value 4'); is_deeply ($rec->{tags}[0]{multi}{'x'}, ['FICTION','FICTION2','FICTION3','FICTION4'], '999$x - multi'); -is ($rec->{tmap}{250}, undef, 'tag map test 2a'); +is_deeply ($rec->{tmap}{250}, [1], 'tag map test 2a'); is_deeply ($rec->{tmap}{999}, [0], 'tag map test 2b'); # map-05 is map-04 with a "no digits" filter on 999$x -- 1.7.2.5