diff options
| author | lpsolit%gmail.com <> | 2008-01-30 02:19:36 +0100 |
|---|---|---|
| committer | lpsolit%gmail.com <> | 2008-01-30 02:19:36 +0100 |
| commit | ac2bbee074d9eae7a6e3983a1c366d1f998db766 (patch) | |
| tree | fb0e6a24cd3f0fae3ed3817979dbc086286e4ae8 | |
| parent | 41ef98b0d415111118420aaada8ddd8d8f98392f (diff) | |
| download | bugzilla-ac2bbee074d9eae7a6e3983a1c366d1f998db766.tar.gz bugzilla-ac2bbee074d9eae7a6e3983a1c366d1f998db766.tar.xz | |
Bug 414002: Temporary files for uploaded attachments are not deleted on Windows - Patch by Steve Hay <SteveHay@planit.com> r/a=LpSolit
| -rw-r--r-- | Bugzilla/CGI.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Bugzilla/CGI.pm b/Bugzilla/CGI.pm index 81141e1cb..aeb8419ca 100644 --- a/Bugzilla/CGI.pm +++ b/Bugzilla/CGI.pm @@ -54,7 +54,10 @@ $::SIG{PIPE} = 'IGNORE'; # We need to do so, too, otherwise perl dies when the object is destroyed # and we don't have a DESTROY method (because CGI.pm's AUTOLOAD will |die| # on getting an unknown sub to try to call) -sub DESTROY {}; +sub DESTROY { + my $self = shift; + $self->SUPER::DESTROY(@_); +}; sub new { my ($invocant, @args) = @_; |