Rev 2286 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2286 | Rev 9480 | ||
---|---|---|---|
Line 47... | Line 47... | ||
47 | !endif |
47 | !endif |
48 | !if $n>$codemax |
48 | !if $n>$codemax |
49 | error=big_code |
49 | error=big_code |
50 | !exit |
50 | !exit |
51 | !endif |
51 | !endif |
- | 52 | ||
- | 53 | coderr=!trim $coderr |
|
- | 54 | coderr2=!trim $coderr2 |
|
- | 55 | m1=!charcnt $coderr |
|
- | 56 | m2=!charcnt $coderr2 |
|
- | 57 | coderr=!text select $namechars in $coderr |
|
- | 58 | coderr2=!text select $namechars in $coderr2 |
|
- | 59 | n1=!charcnt $coderr |
|
- | 60 | n2=!charcnt $coderr2 |
|
- | 61 | !if $m1!=$n1 or $m2!=$n2 |
|
- | 62 | error=bad_newcode |
|
- | 63 | !exit |
|
- | 64 | !endif |
|
- | 65 | !if $coderr!=$coderr2 |
|
- | 66 | error=code_discord |
|
- | 67 | !exit |
|
- | 68 | !endif |
|
- | 69 | n=!charcnt $coderr |
|
- | 70 | !if $n<$codemin |
|
- | 71 | error=small_code |
|
- | 72 | !exit |
|
- | 73 | !endif |
|
- | 74 | !if $n>$codemax |
|
- | 75 | error=big_code |
|
- | 76 | !exit |
|
- | 77 | !endif |
|
- | 78 | ||
52 | !endif |
79 | !endif |
53 | 80 | ||
54 | serial=1 |
81 | serial=1 |
55 | :redo |
82 | :redo |
56 | !if class = $doctype |
83 | !if class = $doctype |