diff options
author | Todd C. Miller <Todd.Miller@courtesan.com> | 2003-03-10 14:00:55 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-03-11 05:33:10 +0000 |
commit | a6d0563455796929d2aae5a18fb57e80a20f87bd (patch) | |
tree | a5da3d0d721e0306e0e455a5f9ae12a0dcc559c4 /lib/charnames.pm | |
parent | 38295cca2bcea18247fdba079ba504a69c9fda94 (diff) | |
download | perl-a6d0563455796929d2aae5a18fb57e80a20f87bd.tar.gz |
typos and other minor things
From: "Todd C. Miller" <Todd.Miller@courtesan.com>
Message-Id: <200303110400.h2B40tEQ018838@xerxes.courtesan.com>
p4raw-id: //depot/perl@18904
Diffstat (limited to 'lib/charnames.pm')
-rw-r--r-- | lib/charnames.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/charnames.pm b/lib/charnames.pm index 7b39cee83c..cd7b08aa97 100644 --- a/lib/charnames.pm +++ b/lib/charnames.pm @@ -107,7 +107,7 @@ sub charnames ## @off will hold the index into the code/name string of the start and ## end of the name as we find it. - ## If :full, look for the the name exactly + ## If :full, look for the name exactly if ($^H{charnames_full} and $txt =~ /\t\t\Q$name\E$/m) { @off = ($-[0], $+[0]); } |