Subversion Repositories wimsdev

Rev

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

Rev 13323 Rev 15699
Line 23... Line 23...
23 
  !endif
 23 
  !endif
24 
!endif
 24 
!endif
25 
 
 25 
 
26 
!set login=!text select $char_alnum in $login
 26 
!set login=!text select $char_alnum in $login
27 
!set login=!char 1 to $[$login_max -$limit] of $login
 27 
!set login=!char 1 to $[$login_max -$limit] of $login
- 
 
 28 
!set tmp=!charcnt $login
- 
 
 29 
!if $tmp<$login_min
- 
 
 30 
  login=$(login)00
- 
 
 31 
  !reset tmp
- 
 
 32 
!endif
28 
!!set cl=!replace internal / by , in $cl
 33 
!!set cl=!replace internal / by , in $cl
29 
!set cl=$(cl[1])
 34 
!set cl=$(cl[1])
30 
!if $cl=$empty
 35 
!if $cl=$empty
31 
  !reset login
 36 
  !reset login
32 
  !exit
 37 
  !exit