Rev 2290 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
23 | reyssat | 1 | !if $forumuser!=supervisor |
13679 | bpr | 2 | !exit |
23 | reyssat | 3 | !endif |
4 | |||
5 | m_=!translate / to , in $r_msg |
||
6 | !distribute item $m_ into a_,b_ |
||
7 | msg=!record $b_ of $forumdir/$a_/.msglist |
||
8 | !distribute item $msg into r_month,r_day,r_time,r_ident,r_prec,r_sender,r_smail |
||
9 | msg=$forumdir/$r_month/$r_ident |
||
10 | !setdef !set m_exists=erased in $msg |
||
11 | job=list |
||
12 | !changeto var.proc.list |
||
13 |