Merge branch 'thh-warnings' into next

* thh-warnings:
  Change handling of warnings.
This commit is contained in:
Thomas Hochstein 2013-09-02 12:59:35 +02:00
commit 439c85a280
4 changed files with 8 additions and 4 deletions

View file

@ -1,4 +1,4 @@
#! /usr/bin/perl -W #! /usr/bin/perl
# #
# feedlog.pl # feedlog.pl
# #
@ -18,6 +18,7 @@ BEGIN {
push(@INC, dirname($0)); push(@INC, dirname($0));
} }
use strict; use strict;
use warnings;
use NewsStats; use NewsStats;

View file

@ -1,4 +1,4 @@
#! /usr/bin/perl -W #! /usr/bin/perl
# #
# gatherstats.pl # gatherstats.pl
# #
@ -18,6 +18,7 @@ BEGIN {
push(@INC, dirname($0)); push(@INC, dirname($0));
} }
use strict; use strict;
use warnings;
use NewsStats qw(:DEFAULT :TimePeriods ListNewsgroups ParseHierarchies ReadGroupList); use NewsStats qw(:DEFAULT :TimePeriods ListNewsgroups ParseHierarchies ReadGroupList);

View file

@ -1,4 +1,4 @@
#! /usr/bin/perl -W #! /usr/bin/perl
# #
# groupstats.pl # groupstats.pl
# #
@ -18,6 +18,7 @@ BEGIN {
push(@INC, dirname($0)); push(@INC, dirname($0));
} }
use strict; use strict;
use warnings;
use NewsStats qw(:DEFAULT :TimePeriods :Output :SQLHelper ReadGroupList); use NewsStats qw(:DEFAULT :TimePeriods :Output :SQLHelper ReadGroupList);

View file

@ -1,4 +1,4 @@
#! /usr/bin/perl -W #! /usr/bin/perl
# #
# install.pl # install.pl
# #
@ -18,6 +18,7 @@ BEGIN {
push(@INC, dirname($0).'/..'); push(@INC, dirname($0).'/..');
} }
use strict; use strict;
use warnings;
use NewsStats qw(:DEFAULT); use NewsStats qw(:DEFAULT);