in reply to Adding CGI::Session::Auth Profile Info
What do I do here to get this to work?Whithout having grokked the whole source, I'd suggest changing the following line in sub _loadProfile:
- $self->{profile}{user_info} = $user_info; + $self->{profile}{user_info} = $user_info if $user_info;
since there are calls to _loadProfile with just one parameter. Are those intended as such? And why are you storing stuff into that HoH object in a sub called _loadProfile? Looks obfuscated.
--shmem
_($_=" "x(1<<5)."?\n".q·/)Oo. G°\ /
/\_¯/(q /
---------------------------- \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Adding CGI::Session::Auth Profile Info
by awohld (Hermit) on Nov 03, 2007 at 05:02 UTC |