Embperl 2.0b8
Perl 5.6.1
Just from 'use Embperl::Mail' I was getting a compilation error. I'm
sure someone must have made this change somewhere, but in case, I've
included a patch. This begs the question of where all the code is that
includes these simple fixes. No use fixing problems that have already
been found. Thanks.
Saadiq
--- Mail.pm.old Mon Mar 18 22:41:23 2002
+++ Mail.pm Tue Oct 8 14:45:17 2002
@@ -76,7 +76,7 @@
($helo?(Hello => $helo):())
) or die "Cannot connect to mailhost
$req->{mailhost}" ;
- my $from = $req -> {from} || $ENV{'EMBPERL_MAILFROM'} || 'WWW-Server\@' .
($ENV{SERVER_NAME}" || 'localhost') ;
+ my $from = $req -> {from} || $ENV{'EMBPERL_MAILFROM'} || 'WWW-Server\@' .
+($ENV{SERVER_NAME} || 'localhost') ;
$smtp->mail($from);
my $to ;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]