diff options
Diffstat (limited to 'macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/05options.t')
-rw-r--r-- | macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/05options.t | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/05options.t b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/05options.t new file mode 100644 index 0000000000..aaf48f0076 --- /dev/null +++ b/macros/texinfo/texinfo/tp/maintain/lib/libintl-perl/tests/05options.t @@ -0,0 +1,38 @@ +#! /usr/local/bin/perl -w + +# vim: syntax=perl +# vim: tabstop=4 + +use strict; + +use Test; + +use constant NUM_TESTS => 3; + +require Locale::TextDomain; + +BEGIN { + plan tests => NUM_TESTS; +} + +my $keywords = Locale::TextDomain->keywords; +ok length $keywords; +my $flags = Locale::TextDomain->flags; +ok length $flags; +my $options = Locale::TextDomain->options; +ok length $options == (length $keywords) + (length $flags) + 1; + +__END__ + +Local Variables: +mode: perl +perl-indent-level: 4 +perl-continued-statement-offset: 4 +perl-continued-brace-offset: 0 +perl-brace-offset: -4 +perl-brace-imaginary-offset: 0 +perl-label-offset: -4 +cperl-indent-level: 4 +cperl-continued-statement-offset: 2 +tab-width: 4 +End: |