[svn:ExtUtils-CBuilder] r9924 - in ExtUtils-CBuilder/trunk: . lib/ExtUtils/CBuilder

[kwilliams]

Author: kwilliams
Date: Sat Sep  8 06:33:17 2007
New Revision: 9924

Modified:
   ExtUtils-CBuilder/trunk/Changes
   ExtUtils-CBuilder/trunk/lib/ExtUtils/CBuilder/Base.pm

Log:
Don't clobber special variables in DESTROY

Modified: ExtUtils-CBuilder/trunk/Changes
==============================================================================
--- ExtUtils-CBuilder/trunk/Changes     (original)
+++ ExtUtils-CBuilder/trunk/Changes     Sat Sep  8 06:33:17 2007
@@ -1,5 +1,8 @@
 Revision history for Perl extension ExtUtils::CBuilder.
 
+ - Protect $., $@, $!, $^E, and $? from any clobbering that might
+   occur in our DESTROY method. [Zefram]
+
  - From bleadperl, a patch to clean up debug symbol files (.pdb for
    VC++, .tds for BCC) when running have_compiler(). [Steve Hay &
    Steve Peters]

Modified: ExtUtils-CBuilder/trunk/lib/ExtUtils/CBuilder/Base.pm
==============================================================================
--- ExtUtils-CBuilder/trunk/lib/ExtUtils/CBuilder/Base.pm       (original)
+++ ExtUtils-CBuilder/trunk/lib/ExtUtils/CBuilder/Base.pm       Sat Sep  8 
06:33:17 2007
@@ -271,6 +271,7 @@
 
 sub DESTROY {
   my $self = shift;
+  local($., $@, $!, $^E, $?);
   $self->cleanup();
 }