--- ./lib/ExtUtils/Manifest.pm-pre	Tue Sep 30 09:10:46 2003
+++ ./lib/ExtUtils/Manifest.pm	Mon Dec  8 17:18:54 2003
@@ -33,6 +33,10 @@ my $Filename = __FILE__;
 $DEFAULT_MSKIP = (File::Spec->splitpath($Filename))[1].
                  "$MANIFEST.SKIP";
 
+eval {
+  $DEFAULT_MSKIP = File::Spec->catpath((File::Spec->splitpath($Filename))[0,1],
+				       "$MANIFEST.SKIP");
+};				# is catpath() always available?
 
 =head1 NAME
 
