Bug#442710: FTBFS: t/check020.......is_valid_checksum: Didn't get object! at /usr/share/perl5/Business/ISBN.pm line 370

[gregor herrmann]

Package: libmarc-lint-perl
Version: 1.42-2
Severity: serious
Tags: patch
Justification: no longer builds from source

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

libmarc-lint-perl FTBFS with the current version of
libbusiness-isbn-perl:

/usr/bin/make -C . OPTIMIZE="-g -Wall -O2" test
make[1]: Entering directory `/home/gregoa/src/rebuild/build/libmarc-lint-perl/libmarc-lint-perl-1.42'
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/check020.......is_valid_checksum: Didn't get object! at /usr/share/perl5/Business/ISBN.pm line 370
	Business::ISBN::is_valid_checksum(1548794743) called at /home/gregoa/src/rebuild/build/libmarc-lint-perl/libmarc-lint-perl-1.42/blib/lib/MARC/Lint.pm line 288
	MARC::Lint::check_020('MARC::Lint=HASH(0x814f7f8)', 'MARC::Field=HASH(0x83c9304)') called at t/check020.t line 81
Can't call method "checksum" without a package or object reference at /usr/share/perl5/Business/ISBN.pm line 372, <DATA> line 210.
# Looks like you planned 28 tests but only ran 6.
# Looks like your test died just after 6.
dubious
	Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 7-28
	Failed 22/28 tests, 21.43% okay
t/check041043....ok
t/check245.......ok
t/lint...........is_valid_checksum: Didn't get object! at /usr/share/perl5/Business/ISBN.pm line 370
	Business::ISBN::is_valid_checksum(0471383147) called at /home/gregoa/src/rebuild/build/libmarc-lint-perl/libmarc-lint-perl-1.42/blib/lib/MARC/Lint.pm line 288
	MARC::Lint::check_020('MARC::Lint=HASH(0x83e8cc8)', 'MARC::Field=HASH(0x843a3d4)') called at /home/gregoa/src/rebuild/build/libmarc-lint-perl/libmarc-lint-perl-1.42/blib/lib/MARC/Lint.pm line 219
	MARC::Lint::check_record('MARC::Lint=HASH(0x83e8cc8)', 'MARC::Record=HASH(0x8439f30)') called at t/lint.t line 24
Can't call method "checksum" without a package or object reference at /usr/share/perl5/Business/ISBN.pm line 372.
# Looks like you planned 41 tests but only ran 4.
# Looks like your test died just after 4.
dubious
	Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 5-41
	Failed 37/41 tests, 9.76% okay
Failed Test  Stat Wstat Total Fail  Failed  List of Failed
- -------------------------------------------------------------------------------
t/check020.t  255 65280    28   44 157.14%  7-28
t/lint.t      255 65280    41   74 180.49%  5-41
Failed 2/4 test scripts, 50.00% okay. 59/142 subtests failed, 58.45% okay.


I've prepared a patch and will committ it to the Debian Perl Group's
subversion repository as soon as I get a number for this bug.

Could someone from the pkg-perl team please review/improve/apply the
patch?

Cheers,
gregor

- -- System Information:
Debian Release: lenny/sid
  APT prefers unstable
  APT policy: (990, 'unstable'), (500, 'experimental'), (500, 'testing'), (500, 'stable')
Architecture: i386 (i686)

Kernel: Linux 2.6.22.200709061812
Locale: LANG=C, LC_CTYPE=de_AT at euro (charmap=ISO-8859-15)
Shell: /bin/sh linked to /bin/bash

Versions of packages libmarc-lint-perl depends on:
pn  libbusiness-isbn-perl         <none>     (no description available)
ii  libmarc-record-perl           2.0.0-1    Perl extension for handling MARC r
ii  perl                          5.8.8-7    Larry Wall's Practical Extraction 

libmarc-lint-perl recommends no packages.

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)

iD8DBQFG7XQtOzKYnQDzz+QRAutmAJwIfbPOY850XZuIEuobpU8A5IsrLACeIkKJ
jD+uF+pggrwXA2XctwVd7ag=
=GKG0
-----END PGP SIGNATURE-----