Found it. Thanks.
http://perl.apache.org/embperl/pod/CVS.htm
On Tue, Oct 08, 2002 at 04:03:58PM -0400, Saadiq Rodgers-King scribbled:
> 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]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
