Rev 10008 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10008 | Rev 12555 | ||
---|---|---|---|
Line 5... | Line 5... | ||
5 | !default gn_getu_=gn_job |
5 | !default gn_getu_=gn_job |
6 | !default gn_cl_=$wims_class |
6 | !default gn_cl_=$wims_class |
7 | !set tmp=!replace internal / by , in $wims_class |
7 | !set tmp=!replace internal / by , in $wims_class |
8 | !set wims_class1=$wims_class |
8 | !set wims_class1=$wims_class |
9 | !if $(tmp[4])!=$empty |
9 | !if $(tmp[4])!=$empty |
10 | !set wims_class1=!item 1 to 3 of $tmp |
10 | !set wims_class1=!item 1 to 3 of $tmp |
11 | !set wims_class1=!replace internal , by / in $wims_class1 |
11 | !set wims_class1=!replace internal , by / in $wims_class1 |
12 | !set wims_class1=!nospace $wims_class1 |
12 | !set wims_class1=!nospace $wims_class1 |
13 | !endif |
13 | !endif |
14 | !set prevuser=!lookup $gn_st in wimshome/log/classes/$wims_class1/.userprevlist |
14 | !set prevuser=!lookup $gn_st in wimshome/log/classes/$wims_class1/.userprevlist |
15 | !if $prevuser!=$empty |
15 | !if $prevuser!=$empty |
16 |
|
16 | !set wims_menu_items=!append line prev_participant,1,cmd=reply&job=$gn_job&$gn_getu_=$prevuser\ |
17 | to $wims_menu_items |
17 | to $wims_menu_items |
18 | !endif |
18 | !endif |
19 | !set nextuser=!lookup $gn_st in wimshome/log/classes/$wims_class1/.usernextlist |
19 | !set nextuser=!lookup $gn_st in wimshome/log/classes/$wims_class1/.usernextlist |
20 | !if $nextuser!=$empty |
20 | !if $nextuser!=$empty |
21 |
|
21 | !set wims_menu_items=!append line next_participant,1,cmd=reply&job=$gn_job&$gn_getu_=$nextuser\ |
22 | to $wims_menu_items |
22 | to $wims_menu_items |
23 | !endif |
23 | !endif |