#!/usr/bin/perl -w ######################################################################### # # Serż Minus (Sergey Lepenkov), <abalama@cpan.org> # # Copyright (C) 1998-2023 D&D Corporation. All Rights Reserved # # This is free software; you can redistribute it and/or modify it # under the same terms as Perl itself. # ######################################################################### use strict; use Test::More; eval "use Test::Fixme"; plan skip_all => "requires Test::Fixme to run" if $@; run_tests( where => [qw/lib/], match => qr/\s+([T]ODO|[F]IX(ME|IT)?|[B]UG)\W/, warn => 1, ); 1; __END__