Rev 23 | Rev 4561 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 23 | Rev 3049 | ||
---|---|---|---|
Line 20... | Line 20... | ||
20 | !endif |
20 | !endif |
21 | 21 | ||
22 | !if $method iswordof user score |
22 | !if $method iswordof user score |
23 | !read scripts/check.user |
23 | !read scripts/check.user |
24 | !if $error!=$empty |
24 | !if $error!=$empty |
- | 25 | error=bad $method |
|
25 | !exit |
26 | !exit |
26 | !endif |
27 | !endif |
27 | !endif |
28 | !endif |
28 | 29 | ||
29 | cn_sync=yes |
30 | cn_sync=yes |
Line 46... | Line 47... | ||
46 | parm_scores=getcsv |
47 | parm_scores=getcsv |
47 | parm_file=getclassfile |
48 | parm_file=getclassfile |
48 | parm_files=getclasstgz |
49 | parm_files=getclasstgz |
49 | 50 | ||
50 | !readproc adm/connect/main.proc $(parm_$method) $ident $rclass $quser |
51 | !readproc adm/connect/main.proc $(parm_$method) $ident $rclass $quser |
51 | - | ||
52 | !if |
52 | !if $cn_status=$empty |
53 | :backerror |
53 | :backerror |
54 | error=back calling error: $cn_data |
54 | error=back calling error: $cn_data $cn_status ---$(parm_$method) $ident $rclass -- $qclass $method |
55 | !exit |
55 | !exit |
56 | !endif |
56 | !endif |
57 | 57 |