openinteract-commits

[Chris W. <la...@us...>]

Update of /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Auth
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20125/Auth

Modified Files:
	User.pm 
Log Message:
cosmetic

Index: User.pm
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/lib/OpenInteract2/Auth/User.pm,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -d -r1.20 -r1.21
*** User.pm	22 Feb 2004 04:41:48 -0000	1.20
--- User.pm	5 Oct 2004 03:05:09 -0000	1.21
***************
*** 23,28 ****
      if ( $user ) {
          $is_logged_in = 'yes';
!         $log->is_info &&
!             $log->info( "Found user from session cache" );
      }
      else {
--- 23,27 ----
      if ( $user ) {
          $is_logged_in = 'yes';
!         $log->is_info && $log->info( "Found user from session cache" );
      }
      else {
***************
*** 137,141 ****
      $log->is_info &&
          $log->info( "Set user to session cache, expires in ",
!                      "[$user_refresh] minutes" );
  }
  
--- 136,140 ----
      $log->is_info &&
          $log->info( "Set user to session cache, expires in ",
!                      "'$user_refresh' minutes" );
  }
  
***************
*** 197,203 ****
          $log->info( "Found login name [$login_name]" );
  
!     my $user = eval { CTX->lookup_object( 'user' )
!                          ->fetch_by_login_name( $login_name,
!                                                 { skip_security => 1 } ) };
      if ( $@ ) {
        $log->error( "Error fetching user by login name: $@" );
--- 196,204 ----
          $log->info( "Found login name [$login_name]" );
  
!     my $user = eval {
!         CTX->lookup_object( 'user' )
!            ->fetch_by_login_name( $login_name,
!                                   { skip_security => 1 } )
!        };
      if ( $@ ) {
        $log->error( "Error fetching user by login name: $@" );
***************
*** 213,217 ****
      # Check the password
  
!     my $password   = $request->param( $password_field );
  
      unless ( $user->check_password( $password ) ) {
--- 214,218 ----
      # Check the password
  
!     my $password = $request->param( $password_field );
  
      unless ( $user->check_password( $password ) ) {