Rev 10703 | Rev 10759 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10703 | Rev 10747 | ||
---|---|---|---|
Line 46... | Line 46... | ||
46 | !if $wims_class isin $cls |
46 | !if $wims_class isin $cls |
47 | !let tmp=!replace internal / by , in $cls |
47 | !let tmp=!replace internal / by , in $cls |
48 | !let compsup=!append line $tmp to $compsup |
48 | !let compsup=!append line $tmp to $compsup |
49 | !endif |
49 | !endif |
50 | !next cls |
50 | !next cls |
- | 51 | !set user_participate_=$user_participate |
|
51 | !let compsup=!sh echo "$compsup" | sort | uniq; |
52 | !let compsup=!sh echo "$compsup" | sort | uniq; |
52 | !!let compsup=!lines2items $compsup |
53 | !!let compsup=!lines2items $compsup |
53 | !!let compsup=!nospace $compsup |
54 | !!let compsup=!nospace $compsup |
54 |
|
55 | U_gotoclass |
- | 56 | ||
55 | !read |
57 | !read adm/class/graphclass participate\ |
56 | $compsup |
58 | $compsup |