<%args> $tab $id <%perl> use Masterkey::Admin; $m->comp("/mc/setup.mc"); my $user = $m->comp("/mc/utils/user.mc"); if (!defined $user) { print "How did you get here when you're not logged on?\n"; return; } my(undef, $session, undef) = new_with_session Masterkey::Admin($tab, $r); $session->update(user_id => $id); # ### We should have code here to handle authUserCookie, but we know # it won't arise because the tabs that you log into using "act # as" don't have that setting. <& /mc/redirect.html, url => "../$tab/" &>