Rev 16702 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 16702 | Rev 16703 | ||
---|---|---|---|
Line 29... | Line 29... | ||
29 | dirs=!exec translator $selw |
29 | dirs=!exec translator $selw |
30 | dirs=!words2items $dirs |
30 | dirs=!words2items $dirs |
31 | dirs=!listuniq $dirs |
31 | dirs=!listuniq $dirs |
32 | dirs=!items2words $dirs |
32 | dirs=!items2words $dirs |
33 | !distribute words y y y y y y y y y y y y y y y y y y y y y y y into $sel |
33 | !distribute words y y y y y y y y y y y y y y y y y y y y y y y into $sel |
34 | !if / isin $wims_class and $user=y and |
34 | !if / isin $wims_class and $user=y and $class_type=1 |
35 | !! cleaning user access in case of portal or groupement |
35 | !! cleaning user access in case of portal or groupement |
36 | nb=!recordcnt wimshome/log/classes/$wims_class/.userlist |
36 | nb=!recordcnt wimshome/log/classes/$wims_class/.userlist |
37 | !for k=1 to $nb |
37 | !for k=1 to $nb |
38 | dt=!record $k of wimshome/log/classes/$wims_class/.userlist |
38 | dt=!record $k of wimshome/log/classes/$wims_class/.userlist |
39 | u=!defof user_participate in wimshome/log/classes/$wims_superclass/.users/$(dt[3]) |
39 | u=!defof user_participate in wimshome/log/classes/$wims_superclass/.users/$(dt[3]) |