Thank you Lu. BTW, set_authenticated is marked as internal method in documentation, so it could be changed some day.
2012/7/12 鲁国庆（Jack Lu） <[email protected]> > my $user = $c->find_user({ user_id => $c->user->user_id }); > $c->set_authenticated($user); > > $user->email will be the new email. > > > On Thu, Jul 12, 2012 at 2:28 AM, Sergey Dmitriev < > [email protected]> wrote: > >> Thank you David! >> >> 2012/7/11 David Schmidt <[email protected]> >> >>> The object returned by $c->user is not what you are looking for. >>> >>> I assume you are using DBIC. >>> >>> Get the "real" user object with $c->user->get_object() >>> >>> >>> http://search.cpan.org/~bobtfish/Catalyst-Plugin-Authentication-0.10021/lib/Catalyst/Authentication/User.pm#get_object(_) >>> >>> cheers >>> david >>> >>> >>> >>> On 11 July 2012 17:37, Sergey Dmitriev <[email protected]> >>> wrote: >>> > Hello, >>> > >>> > My question is simple. I have object of already authenticated user in >>> $u by >>> > using >>> > >>> > my $u = $c->user() >>> > >>> > So, getter $u->email reflects actual email. How then can I update >>> already >>> > loaded user object? E.g. i need something like: >>> > >>> > print $u->email; # old@email >>> > >>> > $u->email = 'new@email'; >>> > >>> > print $u->email; # new@email >>> > >>> > How to achieve this simple way? Do I need to update user rec in DB then >>> > re-load user from DB? Then, which is the simplest way to re-trieve user >>> > again? >>> > >>> > Thank you. >>> > Sergey >>> > >>> > >>> > >>> > _______________________________________________ >>> > List: [email protected] >>> > Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst >>> > Searchable archive: >>> http://www.mail-archive.com/[email protected]/ >>> > Dev site: http://dev.catalyst.perl.org/ >>> > >>> >>> _______________________________________________ >>> List: [email protected] >>> Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst >>> Searchable archive: >>> http://www.mail-archive.com/[email protected]/ >>> Dev site: http://dev.catalyst.perl.org/ >>> >> >> >> _______________________________________________ >> List: [email protected] >> Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst >> Searchable archive: >> http://www.mail-archive.com/[email protected]/ >> Dev site: http://dev.catalyst.perl.org/ >> >> > > > -- > Jack > > _______________________________________________ > List: [email protected] > Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst > Searchable archive: > http://www.mail-archive.com/[email protected]/ > Dev site: http://dev.catalyst.perl.org/ > > -- Love never fails.
_______________________________________________ List: [email protected] Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst Searchable archive: http://www.mail-archive.com/[email protected]/ Dev site: http://dev.catalyst.perl.org/
