Subversion Repositories wimsdev

Rev

Rev 4561 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4561 obado 1
# GetUser
2
# Fournit les informations de l'utilisateur quser
3
 
4667 obado 4
#on commence par verifier la classe $qclass
5
!read scripts/check.class
6
!if $error!=$empty
7
 !exit
8
!endif
9
 
23 reyssat 10
!read scripts/check.user
11
!if $error!=$empty
12
 !exit
13
!endif
14
 
15
!readdef $userdeffile
16
 
17
option=!listintersect $option and $userdefs
1111 bpr 18
 
23 reyssat 19
!if $option=$empty
20
 option=!listcomplement password in $userdefs
21
!endif