[lintian] 02/10: lib: Fix typos in code comments
This is an automated email from the git hooks/post-receive script.
jwilk pushed a commit to branch master
in repository lintian.
commit c143f7552f66d5e31765b90c4c4ddf40844939ae
Author: Jakub Wilk <jwilk@debian.org>
Date: Fri Nov 27 18:27:33 2015 +0100
lib: Fix typos in code comments
---
lib/Lintian/Check.pm | 2 +-
lib/Lintian/Collect.pm | 2 +-
lib/Lintian/Collect/Binary.pm | 2 +-
lib/Lintian/Collect/Group.pm | 2 +-
lib/Lintian/Collect/Package.pm | 2 +-
lib/Lintian/Internal/FrontendUtil.pm | 2 +-
lib/Lintian/Lab.pm | 2 +-
lib/Lintian/Profile.pm | 2 +-
lib/Lintian/Relation.pm | 4 ++--
lib/Lintian/Tag/TextUtil.pm | 2 +-
lib/Lintian/Tags.pm | 4 ++--
lib/Lintian/Util.pm | 2 +-
lib/Test/Lintian.pm | 2 +-
13 files changed, 15 insertions(+), 15 deletions(-)
diff --git a/lib/Lintian/Check.pm b/lib/Lintian/Check.pm
index 4b08fae..a6afa0a 100644
--- a/lib/Lintian/Check.pm
+++ b/lib/Lintian/Check.pm
@@ -155,7 +155,7 @@ sub check_maintainer {
# <email>" (#640489). Email::Valid->address (below) will accept
# this in most cases (because that is generally valid), but we
# only want Email::Valid to validate the "email" part and not the
- # name (Policy allows "." to be unqouted in names, Email::Valid
+ # name (Policy allows "." to be unquoted in names, Email::Valid
# does not etc.). Thus this check is to ensure we only pass the
# "email"-part to Email::Valid.
if ($extra or ($mail && $mail =~ m/\@[^\>\@]+\>[^\>\@]*$/o)) {
diff --git a/lib/Lintian/Collect.pm b/lib/Lintian/Collect.pm
index 6d3e1d7..0147589 100644
--- a/lib/Lintian/Collect.pm
+++ b/lib/Lintian/Collect.pm
@@ -245,7 +245,7 @@ sub is_non_free {
return $self->{is_non_free};
}
-# Internal sub for providing a shared storaged between multiple
+# Internal sub for providing a shared storage between multiple
# L::Collect objects from same group.
#
# sub _set_shared_storage Needs-Info none
diff --git a/lib/Lintian/Collect/Binary.pm b/lib/Lintian/Collect/Binary.pm
index cced5ef..2565c01 100644
--- a/lib/Lintian/Collect/Binary.pm
+++ b/lib/Lintian/Collect/Binary.pm
@@ -220,7 +220,7 @@ sub control_index {
'index_owner_file' => undef,
'fs_root_sub' => 'control',
# Control files are not installed relative to the system root.
- # Accordingly, we forbit absolute paths and symlinks..
+ # Accordingly, we forbid absolute paths and symlinks..
'has_anchored_root_dir' => 0,
};
return $self->_fetch_index_data($load_info, $file);
diff --git a/lib/Lintian/Collect/Group.pm b/lib/Lintian/Collect/Group.pm
index eff95f9..ce37c61 100644
--- a/lib/Lintian/Collect/Group.pm
+++ b/lib/Lintian/Collect/Group.pm
@@ -16,7 +16,7 @@
# You should have received a copy of the GNU General Public License along with
# this program. If not, see <http://www.gnu.org/licenses/>.
-# This is a "Lintian::Collect"-like interace (as in "not quite a
+# This is a "Lintian::Collect"-like interface (as in "not quite a
# Lintian::Collect").
package Lintian::Collect::Group;
diff --git a/lib/Lintian/Collect/Package.pm b/lib/Lintian/Collect/Package.pm
index 90cfbb1..454a2a5 100644
--- a/lib/Lintian/Collect/Package.pm
+++ b/lib/Lintian/Collect/Package.pm
@@ -550,7 +550,7 @@ sub _fetch_index_data {
while (my $current = pop @check) {
$candidates{$current} = 1;
foreach my $rdep (@{$rhlinks{$current}}) {
- # There should not be any cicles, but just in case
+ # There should not be any cycles, but just in case
push @check, $rdep unless $candidates{$rdep};
}
# Remove links we are fixing
diff --git a/lib/Lintian/Internal/FrontendUtil.pm b/lib/Lintian/Internal/FrontendUtil.pm
index 32314df..7ebb04b 100644
--- a/lib/Lintian/Internal/FrontendUtil.pm
+++ b/lib/Lintian/Internal/FrontendUtil.pm
@@ -128,7 +128,7 @@ sub load_collections {
return;
}
-# Return the default number of parallization to be used
+# Return the default number of parallelization to be used
sub default_parallel {
# check cpuinfo for the number of cores...
my %opts = ('err' => '&1');
diff --git a/lib/Lintian/Lab.pm b/lib/Lintian/Lab.pm
index 11a592f..ef1acca 100644
--- a/lib/Lintian/Lab.pm
+++ b/lib/Lintian/Lab.pm
@@ -41,7 +41,7 @@ use constant {
LAB_MODE_TEMP => 'temporary',
};
-# A private table of suported types.
+# A private table of supported types.
my %SUPPORTED_TYPES = (
'binary' => 1,
'changes' => 1,
diff --git a/lib/Lintian/Profile.pm b/lib/Lintian/Profile.pm
index b1ed9d5..b6dffd9 100644
--- a/lib/Lintian/Profile.pm
+++ b/lib/Lintian/Profile.pm
@@ -438,7 +438,7 @@ sub _read_profile_section {
# $self->_read_profile_tags($pname, $pheader)
#
-# Interprets the {dis,en}able-tags{,-from-chcek} fields from
+# Interprets the {dis,en}able-tags{,-from-check} fields from
# the profile header $pheader. $pname is the name of the
# profile (used for error reporting).
#
diff --git a/lib/Lintian/Relation.pm b/lib/Lintian/Relation.pm
index c401005..1f50b39 100644
--- a/lib/Lintian/Relation.pm
+++ b/lib/Lintian/Relation.pm
@@ -153,7 +153,7 @@ sub parse_element {
# multi-arch qualifiers equally so (at least at the moment).
# On unversioned relations, we end up paying for 4 (unique) empty
# scalars.
- # This overhead accumuates to 0.44M for the binary relations of
+ # This overhead accumulates to 0.44M for the binary relations of
# source:linux (on i386).
#
# Fortunately, perl allows us to do "out-of-bounds" access and
@@ -682,7 +682,7 @@ and pass that in as RELATION instead of the string.
# This internal function does the heavy lifting of inverse implication between
# two elements. Takes two elements and returns true iff the falsehood of
# the second can be deduced from the truth of the first. In other words, p
-# implies not q, or resstated, q implies not p. (Since if a implies b, not b
+# implies not q, or restated, q implies not p. (Since if a implies b, not b
# implies not a.) Due to the return value of implies_element(), we can let it
# do most of the work.
sub implies_element_inverse {
diff --git a/lib/Lintian/Tag/TextUtil.pm b/lib/Lintian/Tag/TextUtil.pm
index 511e133..45b2ac1 100644
--- a/lib/Lintian/Tag/TextUtil.pm
+++ b/lib/Lintian/Tag/TextUtil.pm
@@ -32,7 +32,7 @@ use Text::Wrap;
use Lintian::Util qw(fail strip);
-# html_wrap -- word-wrap a paragaph. The wrap() function from Text::Wrap
+# html_wrap -- word-wrap a paragraph. The wrap() function from Text::Wrap
# is not suitable, because it chops words that are longer than the line
# length.
sub html_wrap {
diff --git a/lib/Lintian/Tags.pm b/lib/Lintian/Tags.pm
index 81425a9..1a7efda 100644
--- a/lib/Lintian/Tags.pm
+++ b/lib/Lintian/Tags.pm
@@ -644,7 +644,7 @@ sub file_overrides {
# So, we got an override that does not start with the
# package name - cases include:
# 1 <tag> ...
- # 2 <tag> someting: ...
+ # 2 <tag> something: ...
# 3 <wrong-pkg> [archlist] <type>: <tag> ...
# 4 <wrong-pkg>: <tag> ...
# 5 <wrong-pkg> <type>: <tag> ...
@@ -673,7 +673,7 @@ sub file_overrides {
}
}
# Nope, package name appears to match (or not present
- # atall), not sure what the problem is so we just throw a
+ # at all), not sure what the problem is so we just throw a
# generic parse error.
tag 'malformed-override', "Cannot parse line $.: $_";
diff --git a/lib/Lintian/Util.pm b/lib/Lintian/Util.pm
index 5b4d3e4..0e729f3 100644
--- a/lib/Lintian/Util.pm
+++ b/lib/Lintian/Util.pm
@@ -1143,7 +1143,7 @@ Otherwise, a copy of the string is returned:
while ( my $orig = <$fd> ) {
my $stripped = strip ($orig);
if ($stripped ne $orig) {
- # $orig had leadning or/and trailing whitespace
+ # $orig had leading or/and trailing whitespace
}
}
diff --git a/lib/Test/Lintian.pm b/lib/Test/Lintian.pm
index 68cbb6e..316424a 100644
--- a/lib/Test/Lintian.pm
+++ b/lib/Test/Lintian.pm
@@ -750,7 +750,7 @@ sub _check_reference {
# Check it is a valid reference like URLs or #123456
# NB: "policy 10.1" references already covered above
my $ok = 0;
- $ok = 1 if $reference =~ m/^#\d++$/; # debbug reference
+ $ok = 1 if $reference =~ m/^#\d++$/; # debbugs reference
$ok = 1 if $reference =~ m,^(?:ftp|https?)://,; # browser URL
$ok = 1 if $reference =~ m,^/,; # local file reference
$ok = 1 if $reference =~ m,[\w_-]+\(\d\w*\)$,; # man reference
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/lintian/lintian.git
Reply to: