Rev 4561 | Rev 10778 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4561 | Rev 10120 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | # Modclass |
1 | # Modclass |
2 | # Modifie les |
2 | # Modifie les proprietes de la classe qclass |
3 | 3 | ||
4 | !read scripts/check.class |
4 | !read scripts/check.class |
5 | !if $error!=$empty |
5 | !if $error!=$empty |
6 | !exit |
6 | !exit |
7 | !endif |
7 | !endif |
Line 25... | Line 25... | ||
25 | !if $n_ == connections |
25 | !if $n_ == connections |
26 | !readdef $classdeffile |
26 | !readdef $classdeffile |
27 | !if $v_ notin $class_connections |
27 | !if $v_ notin $class_connections |
28 | !setdef !set class_connections = $class_connections $v_ in $classdeffile |
28 | !setdef !set class_connections = $class_connections $v_ in $classdeffile |
29 | !advance set |
29 | !advance set |
30 | !endif |
30 | !endif |
31 | !endif |
31 | !endif |
32 | 32 | ||
33 | !if $n_ isitemof name,description |
33 | !if $n_ isitemof name,description |
34 | !advance name_or_def |
34 | !advance name_or_def |
35 | !endif |
35 | !endif |
36 | !next i |
36 | !next i |
37 | 37 | ||
38 | !if $set<1 |
38 | !if $set<1 |
39 | error=nothing done |
39 | error=nothing done |
40 | !exit |
40 | !exit |
41 | !endif |
41 | !endif |
42 | 42 | ||
43 |
|
43 | # on ne recree l'index des classes que si un nom ou une description a change |
44 | !if $name_or_def>0 |
44 | !if $name_or_def>0 |
45 | !sh cd $wims_home/log/classes; ./.build-index |
45 | !sh cd $wims_home/log/classes; ./.build-index $qclass |
46 | !endif |
46 | !endif |