I'm trying to get a really simple login/auth working and M::P::A::USC
isn't working for me.

First: is there any sample code out there that works. Login, and
logout?  I'm at the point that I don't care which module it's from
M::P::A::USC or

Second: How do you turn on debugging?  I use:
use Maypole::Application qw(-Debug2 Authentication::UserSessionCookie);

but I don't see the statements that should be coming from the warns in
the UserSessionCookie.pm (at least they don't show up in my
httpd-error.log)

I must be doing something stupid - I'm trying to follow the
authentication HOWTO
(http://www.droogs.org/perl/maypole/authentication.html), but my app
never authenticates any user.  I want the debug on so I can see if it
is even calling the database with the right user field.

Here's my authenticate function:

use Maypole::Constants;
sub authenticate {
   my ($self, $r) = @_;
   $r->get_user;
   # let them go if they exist as a user
   if ($r->user) {
       warn "authenticate: Found user " . $r->user . "\n";
       return OK;
   }

   # otherwise force them to the login page
   warn "authenticate: " . $r->template_args->{login_error} . " :
Sending to login page\n"\
;

   $r->{template} = "login";
   return OK;
}

The upshot is that it always goes to the login page, and r->ruser is
empty, as is the login_error....


Trying not to bang head too hard here...

johnk


--
eBay vs Amazon Shopping Comparison - Try it!
http://aytozon.com


-------------------------------------------------------
This SF.Net email is sponsored by:
Power Architecture Resource Center: Free content, downloads, discussions,
and more. http://solutions.newsforge.com/ibmarch.tmpl
_______________________________________________
Maypole-users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/maypole-users

Reply via email to