From: Jarkko Hietaniemi Date: Wed, 5 Sep 2001 15:40:03 +0000 (+0000) Subject: Typo nits. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1cffc1dde60ddf52abe5e611ef4b70fbf2581bcb;p=p5sagit%2Fp5-mst-13.2.git Typo nits. p4raw-id: //depot/perl@11887 --- diff --git a/lib/File/Find.pm b/lib/File/Find.pm index 41e371e..0d6252a 100644 --- a/lib/File/Find.pm +++ b/lib/File/Find.pm @@ -135,7 +135,7 @@ not in taint-mode, C is a no-op. See above. This should be set using the C quoting operator. The default is set to C. -Note that the parantheses are vital. +Note that the parentheses are vital. =item C @@ -180,8 +180,8 @@ Set the variable C<$File::Find::dont_use_nlink> if you're using AFS, since AFS cheats. -Here's another interesting wanted function. It will find all symlinks -that don't resolve: +Here's another interesting wanted function. It will find all symbolic +links that don't resolve: sub wanted { -l && !-e && print "bogus link: $File::Find::name\n"; @@ -244,7 +244,7 @@ directories (requires Mac::Files): use Mac::Files; # invisible() -- returns 1 if file/directory is invisible, - # 0 if it's visible or undef if an error occured + # 0 if it's visible or undef if an error occurred sub invisible($) { my $file = shift; @@ -488,7 +488,7 @@ sub _find_opt { $untaint_skip = $wanted->{untaint_skip}; $dangling_symlinks = $wanted->{dangling_symlinks}; - # for compatability reasons (find.pl, find2perl) + # for compatibility reasons (find.pl, find2perl) local our ($topdir, $topdev, $topino, $topmode, $topnlink); # a symbolic link to a directory doesn't increase the link count