From: Nicholas Clark Date: Mon, 30 Jul 2007 13:17:14 +0000 (+0000) Subject: Fix typos in comments. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9b382af32a1863be9ef6f8ae39669fd02799f0d1;p=p5sagit%2Fp5-mst-13.2.git Fix typos in comments. p4raw-id: //depot/perl@31668 --- diff --git a/t/uni/case.pl b/t/uni/case.pl index 9d142ed..c42887f 100644 --- a/t/uni/case.pl +++ b/t/uni/case.pl @@ -9,7 +9,7 @@ sub unidump { sub casetest { my ($base, $spec, @funcs) = @_; # For each provided function run it, and run a version with some extra - # characters afterwards. Use a recylcing symbol, as it doesn't change case. + # characters afterwards. Use a recycling symbol, as it doesn't change case. my $ballast = chr (0x2672) x 3; @funcs = map {my $f = $_; ($f, @@ -79,7 +79,7 @@ sub casetest { for my $i (sort keys %$spec) { my $w = unidump($spec->{$i}); if (ord('A') == 193 && $i eq "\x8A\x73") { - $w = '0178'; # It's a latin small Y with diaresis and not a latin small letter sharp 's'. + $w = '0178'; # It's a Latin small Y with diaeresis and not a Latin small letter sharp 's'. } my $u = unpack "C0U", $i; my $h = sprintf "%04X", $u;