Subversion Repositories wimsdev

Rev

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

Rev 879 Rev 880
Line 82... Line 82...
82 
!for t in lastname, firstname, password, email
 82 
!for t in lastname, firstname, password, email
83 
 sadd_$t=$(user_$t)
 83 
 sadd_$t=$(user_$t)
84 
!next t
 84 
!next t
85 
 
 85 
 
86 
!if $passs!=$empty
 86 
!if $passs!=$empty
- 
 
 87 
 c=!char 1 of $passs
- 
 
 88 
 !if $c=* and $wims_priv_cryptpass=allow
87 
 passs=!text select */$char_passwd in $passs
 89 
  p=!text select */$char_passwd in $passs
- 
 
 90 
 !else
- 
 
 91 
  p=!text select $char_passwd in $passs
- 
 
 92 
 !endif
88 
 passlen=!charcnt $passs
 93 
 passlen=!charcnt $passs
89 
 !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
 94 
 !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
90 
  error=bad_password
 95 
  error=bad_password
91 
  !exit
 96 
  !exit
92 
 !endif
 97 
 !endif