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]

Reply via email to