Just a note to say thanks a lot for this. I just spent a couple of
hours trying to work out what on earth was going on before googling
and finding this answer.
It's obviously a shame that Embperl no longer works properly on a
standard perl installation. Hopefully Gerald will get round to adding
this patch soon ... (please Gerald!)
Michael
On Thu, Dec 18, 2008 at 9:33 PM, Frank Wesemann
<f.wesem...@fotofinder.net> wrote:
> Hello again,
> I am sorry for noising, but my first posting was a little hasty I think.
> I think this approach is better as it uses the official interface and will
> therefore be more compatible:
>
>
> Index: Embperl_2.3.0.pm
> ===================================================================
> RCS file: /var/cvsroot/webserver/portal/temp/Embperl_2.3.0.pm,v
> retrieving revision 1.1
> diff -r1.1 Embperl_2.3.0.pm
> 315d314
> <
> 317d315
> < my $params ;
> 321,323c319,323
> < #$params = $cgi->param_fetch( $_ ) ;
> < $params = $cgi->{$_} ;
> < if ($#$params > 0)
> ---
>> #$params = $cgi->param_fetch( $_ ) ;
>> #since Version 3.38 CGI stores params and values in separate
>> "namespace"
>> #http://rt.perl.org/rt3//Ticket/Display.html?id=24294
>> my @values = $cgi->param($_);
>> if ($#values > 0)
> 325c325
> < $fdat->{ $_ } = join ("\t", @$params) ;
> ---
>> $fdat->{ $_ } = join ( $self -> config -> mult_field_sep() ,
>> @values) ;
> 329c329
> < $fdat->{ $_ } = $params -> [0] ;
> ---
>> $fdat->{ $_ } = $values[0] ;
>
>
> --
> mit freundlichem Gruß,
>
> Frank Wesemann
> Fotofinder GmbH USt-IdNr. DE812854514
> Software Entwicklung Web: http://www.fotofinder.com/
> Potsdamer Str. 96 Tel: +49 30 25 79 28 90
> 10785 Berlin Fax: +49 30 25 79 28 999
>
> Sitz: Berlin
> Amtsgericht Berlin Charlottenburg (HRB 73099)
> Geschäftsführer: Ali Paczensky
>
>
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: embperl-unsubscr...@perl.apache.org
> For additional commands, e-mail: embperl-h...@perl.apache.org
>
>
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscr...@perl.apache.org
For additional commands, e-mail: embperl-h...@perl.apache.org
