Skip Menu |
 

This queue is for tickets about the SWF-File CPAN distribution.

Report information
The Basics
Id: 59988
Status: new
Priority: 0/
Queue: SWF-File

People
Owner: Nobody in particular
Requestors: DEMIURG [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.42
Fixed in: (no value)



Subject: Bug in close method
Download (untitled) / with headers
text/plain 557b
At package SWF::BinStream::File I found such code: ============cut================ sub close { my $self = shift; my $res; $self->close; $res = close $self->{_file} if defined $self->{_file}; undef $self->{_file}; $res; } =============cut================= It hangs. I believe the right thing is: =============cut================= sub close { my $self = shift; my $res; $self->SUPER::close; $res = close $self->{_file} if defined $self->{_file}; undef $self->{_file}; $res; } =============cut=================


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.