X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fcharnames.pm;h=cd7b08aa97bfc0bd557bcdb99222e3d797900567;hb=a6d0563455796929d2aae5a18fb57e80a20f87bd;hp=7b39cee83c7f4a4a2085398f6056256cde592638;hpb=9cfe5470b44e33f00045a3b9c3128c6ade6e813f;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/charnames.pm b/lib/charnames.pm index 7b39cee..cd7b08a 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]); }