From 9810fb59419d20567ba6344aad1bbfbda3c7402c Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sat, 10 Nov 2012 17:41:40 +0000 Subject: [PATCH] wip --- cgi-auth-hybrid.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cgi-auth-hybrid.pm b/cgi-auth-hybrid.pm index af0e083..83ee419 100644 --- a/cgi-auth-hybrid.pm +++ b/cgi-auth-hybrid.pm @@ -232,6 +232,8 @@ sub _rp ($$@) { # -/n n POST nrmu user not logged in # fail +UP TO HERE + sub _check_core ($) { my ($r) = @_; my $qassoc = $r->_ch('get_param'); @@ -257,8 +259,6 @@ sub _check_core ($) { } } -UP TO HERE - my $dbh = $r->{Dbh}; my ($nusername, $nlast) = $dbh->selectrow_array("SELECT username, last". -- 2.30.2