File: version.t

package info (click to toggle)
libhtml-tidy-perl 1.60-5
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 472 kB
  • sloc: perl: 1,289; sh: 23; makefile: 7
file content (13 lines) | stat: -rw-r--r-- 342 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#!perl -T

use warnings;
use strict;

use Test::More tests => 4;

use HTML::Tidy;

for my $version_string (HTML::Tidy->tidyp_version, HTML::Tidy->libtidyp_version) {
    like( $version_string, qr/^\d\.\d+$/, 'Valid version string' );
    cmp_ok( $version_string, '>=', '0.90', 'Version is greater than 0.90, which is the one I maintain' );
}