Bug #14571 for Text-vCard: test 05-export failes

Hello, via RT wrote: Show quoted text
Oh boy, this was long time ago... Show quoted text
I have to recreate the test case. OS: AIX 5.2 Maintenance Level 7 Perl: V5.8.0 Text-vCard-1.96 # make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/01-node...........1..41 ok 1 - use Text::vCard::Node; ok 2 - Can use as a base class ok 3 - new() retruns HASH when supplied hash ok 4 - Errors if no class supplied ok 5 - new() carps when no fields supplied ok 6 - new() carps when fields is not an array ref ok 7 - new() carp on wrong number of elements in value comp to fields ok 8 - new() - less data than fields, field set ok ok 9 - new() - less data, empty field returns undef ok 10 - new() - less data, set empty field ok 11 - Created node with no data and methods created ok 12 - new() without node_type still works ok ok 13 - got group as it was set ok 14 - set node worked ok 15 - org - Got two elements back from unit ok 16 - org - Got the elements back from setting unit ok 17 - org - Got the elements back from trying to set unit with string ok 18 - org - copes with unit being empty ok 19 - types() returns stuff ok 20 - types() ok in array or scalar context ok 21 - types() get undef when there are none ok 22 - is_type() home type matches ok 23 - is_type() not work address type ok 24 - is_type() undef when no params ok 25 - is_pref() this is a prefered address ok 26 - is_pref() get undef when not pref ok 27 - is_pref() get undef if no params ok 28 - remove_types() when no params - no error ok 29 - remove_types() undef when scalar, node has params and no match ok 30 - remove_types() get a true value in array context when sucess ok 31 - is_type() Added work type and check non-cases sensative ok 32 - is_type() Removed work type and check non-cases sensative ok 33 - is_type() Removed several types ok 34 - is_type() Added two types ok ok 35 - is_type() Added type to node with no params ok 36 - AUTOLOAD - Po box empty as expected ok 37 - AUTOLOAD - Street address matches ok 38 - AUTOLOAD - set ok ok 39 - AUTOLOAD - carp when method not valid ok 40 - export_data() - Node returns expected data ok 41 - export_data() - Node returns expected data, with undef entry ok t/02-vcard..........1..28 ok 1 - use Text::vCard; ok 2 - use Text::vCard::Addressbook; ok 3 - Can use as a base class ok 4 - new() retruns HASH when supplied hash ok 5 - Errors if no class supplied ok 6 - Croak if add_node() not supplied with anything ok 7 - Croak if add_node() not supplied with node_type ok 8 - The object isa Text::vCard::Node ok 9 - get_of_type() types returns 2 not 3 addresses with array ref ok 10 - nothing of this type found, undef returned ok 11 - get_of_type() types returns 3 not 3 addresses with scalar ok 12 - Undef returned when no addresses available ok 13 - Returns array ref when called in context ok 14 - Got all 2 addresses from array ok 15 - Got 3 addresses from array as expected ok 16 - get() croaks is no params supplied ok 17 - get() with single element and node_type match ok 18 - get() types returns 2 not 3 addresses ok 19 - autogen methods - got FN ok 20 - autogen methods - updated fullname ok 21 - autogen methods - got new fn ok 22 - autogen methods - undef for no email as expected ok 23 - autogen methods - new value set ok 24 - autogen added with alias ok 25 - get_group("item1") - got 2 nodes as arrayref - expected ok 26 - get_group("item1") - got 2 nodes as array - expected ok 27 - get_group("item2","X-AbADR") - got value from node ok 28 - get_group - carp if no group name supplied ok t/03-addressbook....1..13 ok 1 - use Text::vCard::Addressbook; ok 2 - The object isa Text::vCard::Addressbook ok 3 - load() - croak when file does not exist ok 4 - The object isa Text::vCard::Addressbook ok 5 - new() - croak when unable to read file ok 6 - new() - ok error when no proto supplied ok 7 - new() - Can use as a base class ok 8 - new() - retruns HASH when supplied hash ok 9 - new() - carp on non VCARD format ok 10 - The object isa Text::vCard ok 11 - vcards() - returns array ref when in context ok 12 - exstracted address ok ok 13 - vcards() returns array when in context ok t/04-formats........1..17 ok 1 - use Text::vCard::Addressbook; ok 2 - Running from evolution.vcf ok 3 - The object isa Text::vCard::Addressbook ok 4 - evolution.vcf has 1 vcards as expected ok 5 - evolution.vcf has fn data correct ok 6 - got expected phone number ok 7 - Running from apple_2.1_unicode.vcf ok 8 - The object isa Text::vCard::Addressbook ok 9 - apple_2.1_unicode.vcf has 1 vcards as expected ok 10 - apple_2.1_unicode.vcf has fn data correct ok 11 - got expected phone number ok 12 - Running from apple_version3.vcf ok 13 - The object isa Text::vCard::Addressbook ok 14 - apple_version3.vcf has 1 vcards as expected ok 15 - apple_version3.vcf has fn data correct ok 16 - got expected phone number ok 17 - Got note ok ok t/05-export.........1..4 ok 1 - use Text::vCard::Addressbook; # Failed test (t/05-export.t at line 40) # Structures begin differing at: # $got->[4] = 'item2.ADR;work:;;Test Road;Test City;;Test Postcode;Test Country' # $expected->[4] = 'TEL;pref;home:020 666 6666' # Looks like you failed 1 tests of 4. ok 2 - export() - First line correct ok 3 - export() - Last line correct not ok 4 - export() - returned data matched that expected dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test 4 Failed 1/4 tests, 75.00% okay Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t/05-export.t 1 256 4 1 25.00% 4 Failed 1/5 test scripts, 80.00% okay. 1/103 subtests failed, 99.03% okay. make: 1254-004 The error code from the last command is 1. Stop. Should I do any specific tests / traces ?? Show quoted text
Bye Rainer Show quoted text
-- =================================================== Schuler Pressen GmbH & Co. KG Dipl.-Ing. (FH) Rainer Tammer Abt.: ISS Tel.: +49(7161)66-1440 FAX: +49(7161)66-844 eMail: rainer.tammer@schulergroup.com URL: www.schulergroup.com ===================================================

I'm uploading a new version which does not have the test, I think the problem must be to do with Test::More's is_deaply() as it seems to work everywhere else. Thanks for the feedback