Rev 11228 | Rev 12459 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11228 | Rev 12411 | ||
---|---|---|---|
Line 7... | Line 7... | ||
7 | 7 | ||
8 | propall=secure,colors,css,logo,theme,theme_icon,level,security,supass,exolog,ent,oefdefault |
8 | propall=secure,colors,css,logo,theme,theme_icon,level,security,supass,exolog,ent,oefdefault |
9 | propagate=!listintersect $propagate and $propall |
9 | propagate=!listintersect $propagate and $propall |
10 | 10 | ||
11 | !if $propagate=$empty or $confirm=$empty |
11 | !if $propagate=$empty or $confirm=$empty |
12 | !exit |
12 | !exit |
13 | !endif |
13 | !endif |
14 | subclasses=!sh cd $wims_home/log/classes/$wims_class\ |
14 | subclasses=!sh cd $wims_home/log/classes/$wims_class\ |
15 | find . -type d -name '[0-9]*' |
15 | find . -type d -name '[0-9]*' |
16 | !if $class_typename=program and $class_superclass!=$empty |
16 | !if $class_typename=program and $class_superclass!=$empty |
17 | courses=!sh cd $wims_home/log/classes/$wims_class\ |
17 | courses=!sh cd $wims_home/log/classes/$wims_class\ |
18 | cat courses icourses 2>/dev/null | cut -d, -f1 | grep . |
18 | cat courses icourses 2>/dev/null | cut -d, -f1 | grep . |
19 | courses=!words2items $courses |
19 | courses=!words2items $courses |
20 | courses=!makelist $class_superclass/x for x in $courses |
20 | courses=!makelist $class_superclass/x for x in $courses |
21 | !endif |
21 | !endif |
22 | !if $subclasses=$empty and $courses=$empty |
22 | !if $subclasses=$empty and $courses=$empty |
23 | !exit |
23 | !exit |
24 | !endif |
24 | !endif |
25 | 25 | ||
26 | propag=!replace item colors by bgcolor,bgimg,refcolor,ref_menucolor,ref_button_help_color,ref_button_help_bgcolor,ref_button_color,ref_button_bgcolor in $propagate |
26 | propag=!replace item colors by bgcolor,bgimg,refcolor,ref_menucolor,ref_button_help_color,ref_button_help_bgcolor,ref_button_color,ref_button_bgcolor in $propagate |
27 | propag=!replace item logo by logo,logoside in $propag |
27 | propag=!replace item logo by logo,logoside in $propag |
28 | propag=!replace item exolog by exolog,examlog in $propag |
28 | propag=!replace item exolog by exolog,examlog in $propag |
29 | 29 | ||
30 | !if security isitemof $propag |
30 | !if security isitemof $propag |
31 | propag=!listcomplement security in $propag |
31 | propag=!listcomplement security in $propag |
32 | security=!record 0 of wimshome/log/classes/$wims_class/.security |
32 | security=!record 0 of wimshome/log/classes/$wims_class/.security |
33 | propag_security=yes |
33 | propag_security=yes |
34 | !else |
34 | !else |
35 | propag_security=no |
35 | propag_security=no |
36 | !endif |
36 | !endif |
37 | 37 | ||
38 | !if supass isitemof $propag |
38 | !if supass isitemof $propag |
39 | propag=!listcomplement supass in $propag |
39 | propag=!listcomplement supass in $propag |
40 | supass=!defof user_password in wimshome/log/classes/$wims_class/supervisor |
40 | supass=!defof user_password in wimshome/log/classes/$wims_class/supervisor |
41 | propag_supass=yes |
41 | propag_supass=yes |
42 | !else |
42 | !else |
43 | propag_supass=no |
43 | propag_supass=no |
44 | !endif |
44 | !endif |
45 | 45 | ||
46 | !if oefdefault isitemof $propag |
46 | !if oefdefault isitemof $propag |
47 | propag=!listcomplement oefdefault in $propag |
47 | propag=!listcomplement oefdefault in $propag |
48 | propag_oefdefault=yes |
48 | propag_oefdefault=yes |
49 | !else |
49 | !else |
50 | propag_oefdefault=no |
50 | propag_oefdefault=no |
51 | !endif |
51 | !endif |
52 | 52 | ||
53 | 53 | ||
54 | !defread wimshome/log/classes/$wims_class/.def |
54 | !defread wimshome/log/classes/$wims_class/.def |
55 | setup= |
55 | setup= |
56 | 56 | ||
57 | !for s in $propag |
57 | !for s in $propag |
58 | setup=!append line !set class_$s=$(class_$s) to $setup |
58 | setup=!append line !set class_$s=$(class_$s) to $setup |
59 | !next s |
59 | !next s |
60 | 60 | ||
61 | subclasses=!words2items $subclasses |
61 | subclasses=!words2items $subclasses |
62 | subclasses=!makelist $wims_class/x for x in $subclasses |
62 | subclasses=!makelist $wims_class/x for x in $subclasses |
63 | !if $courses!=$empty |
63 | !if $courses!=$empty |
64 | subclasses=!append item $courses to $subclasses |
64 | subclasses=!append item $courses to $subclasses |
65 | !endif |
65 | !endif |
66 | css=!record 0 of wimshome/log/classes/$wims_class/css |
66 | css=!record 0 of wimshome/log/classes/$wims_class/css |
67 | !for s in $subclasses |
67 | !for s in $subclasses |
68 | test=!defof class_defined in wimshome/log/classes/$s/.def |
68 | test=!defof class_defined in wimshome/log/classes/$s/.def |
69 | !if $test=yes |
69 | !if $test=yes |
70 | !setdef $setup in wimshome/log/classes/$s/.def |
70 | !setdef $setup in wimshome/log/classes/$s/.def |
71 | !if css isitemof $propagate |
71 | !if css isitemof $propagate |
72 | !writefile wimshome/log/classes/$s/css $css |
72 | !writefile wimshome/log/classes/$s/css $css |
73 | !endif |
73 | !endif |
74 | !if $propag_security=yes |
74 | !if $propag_security=yes |
75 | !writefile wimshome/log/classes/$s/.security $security |
75 | !writefile wimshome/log/classes/$s/.security $security |
76 | !endif |
76 | !endif |
77 | !if $propag_supass=yes |
77 | !if $propag_supass=yes |
78 | !setdef !set user_password=$supass in wimshome/log/classes/$s/supervisor |
78 | !setdef !set user_password=$supass in wimshome/log/classes/$s/supervisor |
79 | !endif |
79 | !endif |
80 | !if $propag_oefdefault=yes |
80 | !if $propag_oefdefault=yes |
81 | !setdef !set user_qnum=$wims_oefdefault_qnum\ |
81 | !setdef !set user_qnum=$wims_oefdefault_qnum\ |
82 | !set user_qcmlevel=$wims_oefdefault_qcmlevel\ |
82 | !set user_qcmlevel=$wims_oefdefault_qcmlevel\ |
83 | !set user_scoredelay=$wims_oefdefault_scoredelay\ |
83 | !set user_scoredelay=$wims_oefdefault_scoredelay\ |
84 | !set user_qcmpresent=$wims_oefdefault_qcmpresent\ |
84 | !set user_qcmpresent=$wims_oefdefault_qcmpresent\ |
85 | !set user_presentsol=$wims_oefdefault_presentsol\ |
85 | !set user_presentsol=$wims_oefdefault_presentsol\ |
86 | !set user_check=$wims_oefdefault_check_\ |
86 | !set user_check=$wims_oefdefault_check_\ |
87 | !set user_sepow=$wims_oefdefault_sepow\ |
87 | !set user_sepow=$wims_oefdefault_sepow\ |
88 | !set user_expow=$wims_oefdefault_expow\ |
88 | !set user_expow=$wims_oefdefault_expow\ |
89 | !set user_precw=$wims_oefdefault_precw\ |
89 | !set user_precw=$wims_oefdefault_precw\ |
90 | in wimshome/log/classes/$s/supervisor |
90 | in wimshome/log/classes/$s/supervisor |
- | 91 | !endif |
|
91 | !endif |
92 | !endif |
92 | !endif |
- | |
93 | !next s |
93 | !next s |
94 | 94 | ||
95 | !exit |
95 | !exit |
96 | rajouter qui se trouve dans le fichier supervisor |
96 | rajouter qui se trouve dans le fichier supervisor |
97 | !setdef !set user_qnum=$nw_qnum\ |
97 | !setdef !set user_qnum=$nw_qnum\ |