Hi,
>
>
> sub handler {
> my $r = shift;
> my $udat = HTML::Embperl::Req::SetupSession($r);
> # do stuff with udat, perhaps return denied, etc.
> HTML::Embperl::Req::CleanupSession();
do not call CleanupSession here, Embperl will do it for you later. If you
call CleanupSession here EMbperl doesn't have a chance to get the ID and set
the cookie.
If it is possible that a non Embperl page is processed, (that does not call
CleanupSession), then register a cleanup handler:
$r -> register_cleanup (\&HTML::Embperl::Req::CleanupSession) ;
This make sure that the session is written to disk and closed after the
request.
In cases where no Embperl page is processed, but you want to use Embperl
session management, you have to set the cookie on your own:
$r -> header_out ("Set-Cookie" => "EMBPERL_UID=$udat->{_id}") ;
Let me know if this works for you
Gerald
>
> ++ P.S. The Embperl docs (and perldoc) incorrectly label RefreshSession
as
> DeleteSession...
>
Yes, Ilia already pointed out this. It's a copy & paste error..., but anyway
thanks for the hint
-------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
Internetconnect * Webserver/-design/-datenbanken * Consulting
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: [EMAIL PROTECTED] Voice: +49 6133 925151
WWW: http://www.ecos.de Fax: +49 6133 925152
-------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
