From 1f50c5a9cc362b5e276f2064562b077f152c5252 Mon Sep 17 00:00:00 2001
From: Gurusamy Sarathy <gsar@cpan.org>
Date: Mon, 9 Jul 2001 03:42:20 +0000
Subject: [PATCH] remove *.pdb files on windows upon $(MAKE) clean (fixes
 failure of ExtUtils.t#27 when built in debug mode)

p4raw-id: //depot/perl@11228
---
 lib/ExtUtils/MM_Win32.pm | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/lib/ExtUtils/MM_Win32.pm b/lib/ExtUtils/MM_Win32.pm
index be00a6b..b7a8f81 100644
--- a/lib/ExtUtils/MM_Win32.pm
+++ b/lib/ExtUtils/MM_Win32.pm
@@ -535,16 +535,15 @@ $(INST_DYNAMIC): $(OBJECT) $(MYEXTLIB) $(BOOTSTRAP) $(INST_ARCHAUTODIR)\.exists
 
 sub clean
 {
- my ($self) = @_;
- my $s = &ExtUtils::MM_Unix::clean;
- if ($GCC) {
-	$s .= <<'END';
+    my ($self) = @_;
+    my $s = &ExtUtils::MM_Unix::clean;
+    my $clean = $GCC ? 'dll.base dll.exp' : '*.pdb';
+    $s .= <<END;
 clean ::
-	-$(RM_F) dll.base dll.exp
+	-\$(RM_F) $clean
 
 END
- }
- return $s;
+    return $s;
 }
 
 
-- 
2.7.4