Subversion Repositories wimsdev

Rev

Rev 7803 | Rev 11147 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7803 Rev 11139
Line 13... Line 13...
13 
 !distribute items $l into ln,fn,li
 13 
 !distribute items $l into ln,fn,li
14 
 pw=!defof user_password in $classdir_1/.users/$li
 14 
 pw=!defof user_password in $classdir_1/.users/$li
15 
 pw=!word 1 of $pw
 15 
 pw=!word 1 of $pw
16 
 em=!defof user_email in $classdir_1/.users/$li
 16 
 em=!defof user_email in $classdir_1/.users/$li
17 
 ep=!defof user_participate in $classdir_1/.users/$li
 17 
 ep=!defof user_participate in $classdir_1/.users/$li
18 
 es=!defof user_supervise in $classdir_1/.users/$lis
 18 
 es=!defof user_supervise in $classdir_1/.users/$li
19 
 
 19 
 
20 
 tcsv=$tcsv\
 20 
 tcsv=$tcsv\
21 
"$li","$ln","$fn","$pw","$em","yes",$es,$ep
 21 
"$li","$ln","$fn","$pw","$em","yes","$es","$ep"
22 
!next i
 22 
!next i
23 
 
 23 
 
24 
!writefile getfile/teachers.csv $tcsv
 24 
!writefile getfile/teachers.csv $tcsv
25 
ttsv=!translate , to $	$ in $tcsv
 25 
ttsv=!translate , to $	$ in $tcsv
26 
!writefile getfile/teachers.tsv $ttsv
 26 
!writefile getfile/teachers.tsv $ttsv