Skip Menu |

This queue is for tickets about the Net-SMTP-SSL CPAN distribution.

Report information
The Basics
Id: 28727
Status: resolved
Priority: 0/
Queue: Net-SMTP-SSL

People
Owner: Nobody in particular
Requestors: sburton [...] allafrica.com
Cc:
AdminCc:

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



Subject: UNIVERSAL::isa( $obj, "Net::SMTP" ) returns false
Date: Wed, 08 Aug 2007 05:47:45 -0400
To: bug-Net-SMTP-SSL [...] rt.cpan.org
From: Sherrard Burton <sburton [...] allafrica.com>
not sure if this package is still being maintained, but i had a problem trying to use Net::SMTP::SSL in conjunction with Mail::Internet, which will accept a Net::SMTP object as an argument. the problem is that even thought Net::SMTP::SSL grabs all of the ISAs for Net::SMTP, it doesn't add Net::SMTP itself. as a result, UNIVERSAL::isa($obj,'Net::SMTP') returns false. i fixed this by changing this @ISA = ( 'IO::Socket::SSL', grep { $_ ne 'IO::Socket::INET' } @Net::SMTP::ISA ); to this @ISA = ( 'IO::Socket::SSL', 'Net::SMTP', grep { $_ ne 'IO::Socket::INET' } @Net::SMTP::ISA ); this was using Net-SMTP-SSL-1.01 perl, v5.8.7 built for i386-linux-thread-multi Linux editorial.allafrica.com 2.4.27-3-686-smp #1 SMP Tue Dec 5 23:12:28 UTC 2006 i686 GNU/Linux
Eight years later: I have fixed this, but by providing an isa method, rather than changing @ISA. -- rjbs