summaryrefslogtreecommitdiff
path: root/warnings.pl
diff options
context:
space:
mode:
Diffstat (limited to 'warnings.pl')
-rw-r--r--warnings.pl6
1 files changed, 3 insertions, 3 deletions
diff --git a/warnings.pl b/warnings.pl
index e317b0a48e..e5ac703492 100644
--- a/warnings.pl
+++ b/warnings.pl
@@ -486,7 +486,7 @@ sub bits {
$mask |= $DeadBits{$word} if $fatal ;
}
else
- { croak("unknown warnings category '$word'")}
+ { croak("Unknown warnings category '$word'")}
}
return $mask ;
@@ -523,12 +523,12 @@ sub __chk
$category = shift ;
if (ref $category) {
croak ("not an object")
- if $category !~ /^([^=]+)=/ ;+
+ if $category !~ /^([^=]+)=/ ;
$category = $1 ;
$isobj = 1 ;
}
$offset = $Offsets{$category};
- croak("unknown warnings category '$category'")
+ croak("Unknown warnings category '$category'")
unless defined $offset;
}
else {