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 |