Rev 6108 | Rev 12080 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 6108 | Rev 10714 | ||
---|---|---|---|
Line 22... | Line 22... | ||
22 | :next |
22 | :next |
23 | new=$wims_sesdir/upload/class |
23 | new=$wims_sesdir/upload/class |
24 | old=log/classes/$wims_class |
24 | old=log/classes/$wims_class |
25 | v=!record 0 of wimshome/$new/version |
25 | v=!record 0 of wimshome/$new/version |
26 | v=!trim $v |
26 | v=!trim $v |
- | 27 | !!version <=4 for classes |
|
27 | !if $v=$empty or $v |
28 | !if $v=$empty or $v<4 |
28 | error=bad_file |
29 | error=bad_file |
29 | !exit |
30 | !exit |
30 | !endif |
31 | !endif |
31 | 32 | ||
32 | !for type in new,old |
33 | !for type in new,old |
Line 43... | Line 44... | ||
43 | !for rec in $reclist |
44 | !for rec in $reclist |
44 | !if $(new_$(rec)cnt)>0 |
45 | !if $(new_$(rec)cnt)>0 |
45 | gotlist=!append item $rec to $gotlist |
46 | gotlist=!append item $rec to $gotlist |
46 | !endif |
47 | !endif |
47 | !next rec |
48 | !next rec |
48 | - | ||
49 | 49 | ||
50 | !if $gotlist=$empty |
50 | !if $gotlist=$empty |
51 | error=empty_file |
51 | error=empty_file |
52 | !exit |
52 | !exit |
53 | !endif |
53 | !endif |