From b7421fead974b6ad2f591b1216964af1a295983c Mon Sep 17 00:00:00 2001 From: nanardon Date: Thu, 22 Dec 2005 20:01:59 +0000 Subject: - use strict everywhere, thanks CPAN tester git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@86 971eb68f-4bfb-0310-8326-d2484c010a4c --- RPM4/lib/RPM4/Header/Changelogs.pm | 3 +++ RPM4/lib/RPM4/Header/Dependencies.pm | 3 +++ RPM4/lib/RPM4/Header/Files.pm | 3 +++ 3 files changed, 9 insertions(+) (limited to 'RPM4') diff --git a/RPM4/lib/RPM4/Header/Changelogs.pm b/RPM4/lib/RPM4/Header/Changelogs.pm index 570d190..37c6287 100644 --- a/RPM4/lib/RPM4/Header/Changelogs.pm +++ b/RPM4/lib/RPM4/Header/Changelogs.pm @@ -18,6 +18,9 @@ package RPM4::Header::Changelogs; +use strict; +use warnings; + sub new { my ($class, $header) = @_; diff --git a/RPM4/lib/RPM4/Header/Dependencies.pm b/RPM4/lib/RPM4/Header/Dependencies.pm index ecdf5af..da809cf 100644 --- a/RPM4/lib/RPM4/Header/Dependencies.pm +++ b/RPM4/lib/RPM4/Header/Dependencies.pm @@ -18,6 +18,9 @@ package RPM4::Header::Dependencies; +use strict; +use warnings; + sub new { my ($class, $deptag, $initdep, @depdesc) = @_; print "$deptag, $initdep\n"; diff --git a/RPM4/lib/RPM4/Header/Files.pm b/RPM4/lib/RPM4/Header/Files.pm index 236d248..a3d9d78 100644 --- a/RPM4/lib/RPM4/Header/Files.pm +++ b/RPM4/lib/RPM4/Header/Files.pm @@ -18,6 +18,9 @@ package RPM4::Header::Files; +use strict; +use warnings; + sub dircount { $_[0]->countdir(); } -- cgit v1.2.1