Rev 23 | Rev 14839 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 23 | reyssat | 1 | !bound job2 within first,mod1,mod2,del1,del2,pub\ |
| 2 | default $ |
||
| 3 | |||
| 4 | devcnt=!recordcnt wimshome/log/.developers |
||
| 5 | !for d=1 to $devcnt |
||
| 6 | drec$d=!record $d of wimshome/log/.developers |
||
| 7 | d_=!word 1 of $(drec$d) |
||
| 8 | devlist=$devlist $d_ |
||
| 9 | !next d |
||
| 10 | !bound devno between integer 0 and $devcnt default 0 |
||
| 11 | |||
| 12 | !if $job2=pub |
||
| 13 | dp=!items2words $devpublisher |
||
| 14 | dp=!words2items $dp |
||
| 15 | !sh echo "$dp" >$wims_home/log/.devpublishers |
||
| 16 | job2=first |
||
| 17 | !endif |
||
| 18 | |||
| 19 | devpublisher=!record 0 of wimshome/log/.devpublishers |
||
| 20 | |||
| 21 | !read developer/$job2.proc |
||
| 22 |