Subversion Repositories wimsdev

Rev

Rev 5015 | Rev 5028 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5015 Rev 5016
Line 96... Line 96...
96 
 
 96 
 
97 
##### final test of external connection #####
 97 
##### final test of external connection #####
98 
# finaly, we must check if user is allowed in class
 98 
# finaly, we must check if user is allowed in class
99 
 
 99 
 
100 
exist_check=!defof user_exists in $userdef
 100 
exist_check=!defof user_exists in $userdef
101 
!debug $auth_test
 - 
 
- 
 
 101 
 
102 
!if OK iswordof $auth_test and $auth_method isitemof $auth_method_list
 102 
!if OK iswordof $auth_test and $auth_method isitemof $auth_method_list
103 
 !if $exist_check issametext yes
 103 
 !if $exist_check issametext yes
104 
   !goto auth_ok
 104 
   !goto auth_ok
105 
 !else
 105 
 !else
106 
   !setdef user_auth=$auth_user_orig in wimshome/$wims_sesdir/var.stat
 106 
   !setdef user_auth=$auth_user_orig in wimshome/$wims_sesdir/var.stat