Subversion Repositories wimsdev

Rev

Rev 10228 | Rev 12520 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 10228 Rev 11681
Line 41... Line 41...
41 
   to $wims_menu_items
 41 
   to $wims_menu_items
42 
!set u = !linecnt $name
 42 
!set u = !linecnt $name
43 
!for i = 1 to $u
 43 
!for i = 1 to $u
44 
   !set cnt=!itemcnt $(name[$i;])
 44 
   !set cnt=!itemcnt $(name[$i;])
45 
   !for a =1 to $cnt
 45 
   !for a =1 to $cnt
- 
 
 46 
   !set wims_name_title_quick_$(name[$i;$a])=$(explication[$i;$a])
46 
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
 47 
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
47 
    to $wims_menu_items
 48 
    to $wims_menu_items
48 
   !next a
 49 
   !next a
49 
!next
 50 
!next
50 
!endif
 51 
!endif