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