From 714e330012e0b44220312aba526b4ebaa63ef60f Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 20 Apr 2009 14:37:49 -0400 Subject: let's write class, not cls --- Debian/Debhelper/Buildsystem/cmake.pm | 4 ++-- Debian/Debhelper/Buildsystem/makefile.pm | 4 ++-- Debian/Debhelper/Buildsystem/perl_build.pm | 4 ++-- Debian/Debhelper/Buildsystem/perl_makemaker.pm | 4 ++-- 4 files changed, 8 insertions(+), 8 deletions(-) (limited to 'Debian/Debhelper/Buildsystem') diff --git a/Debian/Debhelper/Buildsystem/cmake.pm b/Debian/Debhelper/Buildsystem/cmake.pm index 1b5dda40..f40b020f 100644 --- a/Debian/Debhelper/Buildsystem/cmake.pm +++ b/Debian/Debhelper/Buildsystem/cmake.pm @@ -23,8 +23,8 @@ sub check_auto_buildable { } sub new { - my $cls=shift; - my $self=$cls->SUPER::new(@_); + my $class=shift; + my $self=$class->SUPER::new(@_); # Enforce outside-source tree builds. $self->enforce_outside_source_building(); return $self; diff --git a/Debian/Debhelper/Buildsystem/makefile.pm b/Debian/Debhelper/Buildsystem/makefile.pm index 9ac74fa2..0eab0c4a 100644 --- a/Debian/Debhelper/Buildsystem/makefile.pm +++ b/Debian/Debhelper/Buildsystem/makefile.pm @@ -47,8 +47,8 @@ sub DESCRIPTION { } sub new { - my $cls=shift; - my $self=$cls->SUPER::new(@_); + my $class=shift; + my $self=$class->SUPER::new(@_); $self->{makecmd} = (exists $ENV{MAKE}) ? $ENV{MAKE} : "make"; return $self; } diff --git a/Debian/Debhelper/Buildsystem/perl_build.pm b/Debian/Debhelper/Buildsystem/perl_build.pm index d6bd063b..03608564 100644 --- a/Debian/Debhelper/Buildsystem/perl_build.pm +++ b/Debian/Debhelper/Buildsystem/perl_build.pm @@ -32,8 +32,8 @@ sub do_perl { } sub new { - my $cls=shift; - my $self= $cls->SUPER::new(@_); + my $class=shift; + my $self= $class->SUPER::new(@_); $self->enforce_in_source_building(); return $self; } diff --git a/Debian/Debhelper/Buildsystem/perl_makemaker.pm b/Debian/Debhelper/Buildsystem/perl_makemaker.pm index fc86e9bd..74eaf6bf 100644 --- a/Debian/Debhelper/Buildsystem/perl_makemaker.pm +++ b/Debian/Debhelper/Buildsystem/perl_makemaker.pm @@ -28,8 +28,8 @@ sub check_auto_buildable { } sub new { - my $cls=shift; - my $self=$cls->SUPER::new(@_); + my $class=shift; + my $self=$class->SUPER::new(@_); $self->enforce_in_source_building(); return $self; } -- cgit v1.2.3