Suppress Sys::Syslog diag msg (repost)
[p5sagit/p5-mst-13.2.git] / ext / Sys / Syslog / t / 00-load.t
1 #!perl -wT
2 use strict;
3 use Test::More tests => 1;
4
5 BEGIN {
6         use_ok( 'Sys::Syslog' );
7 }
8
9 diag( "Testing Sys::Syslog $Sys::Syslog::VERSION, Perl $], $^X" )
10     if (! exists($ENV{'PERL_CORE'}));