File: 04_synopsis.t

package info (click to toggle)
libmousex-strictconstructor-perl 0.02-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid, trixie
  • size: 196 kB
  • sloc: perl: 1,460; makefile: 2
file content (9 lines) | stat: -rwxr-xr-x 213 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
 
#!perl
use strict;
use Test::More;
eval q{use Test::Synopsis};
plan skip_all => 'Test::Synopsis required for testing' if $@;
local $SIG{__WARN__} = sub {
    warn @_ if $_[0] !~ /redefined/;
};
all_synopsis_ok();