1 --- perl-5.12.3/cpan/Sys-Syslog/t/syslog.t~ 2011-02-21 19:02:35.662388256 +0100
2 +++ perl-5.12.3/cpan/Sys-Syslog/t/syslog.t 2011-02-21 19:02:54.904308246 +0100
4 ok( !$r, "setlogsock() on Cygwin without syslog-ng should return false: '$r'" );
8 - ok( $r, "setlogsock() should return true: '$r'" );
11 # setlogsock() with "stream" and an empty path
12 $r = eval { setlogsock("stream", '' ) } || '';