--- loncom/auth/lonacc.pm 2008/09/15 19:08:44 1.116 +++ loncom/auth/lonacc.pm 2008/11/10 13:20:24 1.117 @@ -1,7 +1,7 @@ # The LearningOnline Network # Cookie Based Access Handler # -# $Id: lonacc.pm,v 1.116 2008/09/15 19:08:44 raeburn Exp $ +# $Id: lonacc.pm,v 1.117 2008/11/10 13:20:24 jms Exp $ # # Copyright Michigan State University Board of Trustees # @@ -150,6 +150,7 @@ sub get_posted_cgi { # balance them # returns OK if it was a SSO and user was handled # undef if not SSO or no means to hanle the user + sub sso_login { my ($r,$handle) = @_;