From 6286f723a70d9d63bf59e611a2946140879179c3 Mon Sep 17 00:00:00 2001
From: "Michael G. Schwern" <schwern@pobox.com>
Date: Tue, 3 Sep 2002 10:21:57 -0700
Subject: File::Basename doesn't lazy load Carp right. and Subject: [PATCH]
 More modules that don't lazy load Carp right. Message-ID:
 <20020904002157.GD2701@ool-18b93024.dyn.optonline.net> and Message-ID:
 <20020904003857.GE2701@ool-18b93024.dyn.optonline.net>

p4raw-id: //depot/perl@17840
---
 lib/File/Basename.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/File')

diff --git a/lib/File/Basename.pm b/lib/File/Basename.pm
index f2ef495cdd..1c9a419313 100644
--- a/lib/File/Basename.pm
+++ b/lib/File/Basename.pm
@@ -169,7 +169,7 @@ sub fileparse {
   my($fullname,@suffices) = @_;
   unless (defined $fullname) {
       require Carp;
-      Carp::croak "fileparse(): need a valid pathname";
+      Carp::croak("fileparse(): need a valid pathname");
   }
   my($fstype,$igncase) = ($Fileparse_fstype, $Fileparse_igncase);
   my($dirpath,$tail,$suffix,$basename);
-- 
cgit v1.2.1