From: Gurusamy Sarathy <gsar@cpan.org>
Date: Tue, 7 Mar 2000 05:14:49 +0000 (+0000)
Subject: typo in makedef.pl
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=341bd822d2aa170d6da924b2ac1ec314d007122b;p=p5sagit%2Fp5-mst-13.2.git

typo in makedef.pl

p4raw-id: //depot/perl@5592
---

diff --git a/lib/File/Path.pm b/lib/File/Path.pm
index fb5377d..46f360a 100644
--- a/lib/File/Path.pm
+++ b/lib/File/Path.pm
@@ -73,7 +73,7 @@ than VMS is settled.  (defaults to FALSE)
 =back
 
 It returns the number of files successfully deleted.  Symlinks are
-treated as ordinary files.
+simply deleted and not followed.
 
 B<NOTE:> If the third parameter is not TRUE, C<rmtree> is B<unsecure>
 in the face of failure or interruption.  Files and directories which
diff --git a/makedef.pl b/makedef.pl
index bfa16de..1170ba5 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -103,7 +103,7 @@ close(CFG);
 # perl.h logic duplication begins
 
 if ($define{USE_ITHREADS}) {
-    if (!$define{MULTIPLICITY} && !define{PERL_OBJECT}) {
+    if (!$define{MULTIPLICITY} && !$define{PERL_OBJECT}) {
         $define{MULTIPLICITY} = 1;
     }
 }