You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl@perl.apache.org by Saadiq Rodgers-King <sa...@nyc.rr.com> on 2002/10/08 22:03:58 UTC

Mail.pm compile error?

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

Re: Mail.pm compile error?

Posted by Gerald Richter <ri...@ecos.de>.

> Found it.  Thanks.
>
> http://perl.apache.org/embperl/pod/CVS.htm
>

If you want to checkout the code for Embperl 2, you need to use the branch
Embperl2c, i.e. use the option -r Embperl2c when doing the checkout. The
mail error is already fix in the CVS.

Anyway thanks for the patch

Gerald


-------------------------------------------------------------
Gerald Richter    ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting

Post:       Tulpenstrasse 5         D-55276 Dienheim b. Mainz
E-Mail:     richter@ecos.de         Voice:    +49 6133 925131
WWW:        http://www.ecos.de      Fax:      +49 6133 925152
-------------------------------------------------------------


---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Re: Mail.pm compile error?

Posted by Saadiq Rodgers-King <sa...@nyc.rr.com>.
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: embperl-unsubscribe@perl.apache.org
> For additional commands, e-mail: embperl-help@perl.apache.org

---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org