X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fconstant.t;h=51902eb4ced6303c6169f9f543400c8ba000e51d;hb=93c87d9dc758ed6254c5eaa31718f40901b73ac0;hp=a5ffb2ccbe681d6394530d584472e76f0bc6f9cb;hpb=10a0e555f3acbb17b8816ba5ce3d985544996d47;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/constant.t b/lib/constant.t index a5ffb2c..51902eb 100644 --- a/lib/constant.t +++ b/lib/constant.t @@ -10,7 +10,7 @@ use vars qw{ @warnings }; BEGIN { # ...and save 'em for later $SIG{'__WARN__'} = sub { push @warnings, @_ } } -END { print @warnings } +END { print STDERR @warnings } use strict;