Subversion Repositories wimsdev

Rev

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

Rev 880 Rev 881
Line 84... Line 84...
84 
!next t
 84 
!next t
85 
 
 85 
 
86 
!if $passs!=$empty
 86 
!if $passs!=$empty
87 
 c=!char 1 of $passs
 87 
 c=!char 1 of $passs
88 
 !if $c=* and $wims_priv_cryptpass=allow
 88 
 !if $c=* and $wims_priv_cryptpass=allow
89 
  p=!text select */$char_passwd in $passs
 89 
  passs=!text select */$char_passwd in $passs
90 
 !else
 90 
 !else
91 
  p=!text select $char_passwd in $passs
 91 
  passs=!text select $char_passwd in $passs
92 
 !endif
 92 
 !endif
93 
 passlen=!charcnt $passs
 93 
 passlen=!charcnt $passs
94 
 !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
 94 
 !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
95 
  error=bad_password
 95 
  error=bad_password
96 
  !exit
 96 
  !exit