← Back to branch summary

~ubuntu-branches/ubuntu/trusty/libversion-perl/trusty

« back to all changes in this revision

Viewing changes to t/coretests.pm

  • Committer: Package Import Robot
  • Author(s): Logan Rosen
  • Date: 2012-11-08 11:58:04 UTC
  • mfrom: (7.1.11 sid)
  • Revision ID: package-import@ubuntu.com-20121108115804-yxcczqex0t9ti27n
Tags: 1:0.9901-1ubuntu1
* Merge from Debian unstable. Remaining changes:
  - Build-depend on locales rather than locales-all.
* debian/changelog: Fix badly formatted trailer line.

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/coretests.pm
538
538
    {
539
539
        # https://rt.cpan.org/Ticket/Display.html?id=72365
540
540
        # https://rt.perl.org/rt3/Ticket/Display.html?id=102586
 
541
        # https://rt.cpan.org/Ticket/Display.html?id=78328
541
542
        eval 'my $v = $CLASS->$method("version")';
542
543
        like $@, qr/Invalid version format/,
543
 
            'The string "version" is not a version';
 
544
            "The string 'version' is not a version for $method";
544
545
        eval 'my $v = $CLASS->$method("ver510n")';
545
546
        like $@, qr/Invalid version format/,
546
547
            'All strings starting with "v" are not versions';
593
594
        eval { _112478->VERSION(9e99) };
594
595
        unlike $@, qr/panic/, '->VERSION(9e99) does not panic';
595
596
    }
 
597
 
 
598
    { # https://rt.cpan.org/Ticket/Display.html?id=79259
 
599
        my $v = $CLASS->new("0.52_0");
 
600
        ok $v->is_alpha, 'Just checking';
 
601
        is $v->numify, '0.520', 'Correctly nummified';
 
602
    }
 
603
 
596
604
}
597
605
 
598
606
1;