Subversion Repositories wimsdev

Rev

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

Rev 7673 Rev 8155
Line 24... Line 24...
24 
};
 24 
};
25 
 
 25 
 
26 
/* Produces <select> and <option>s.
 26 
/* Produces <select> and <option>s.
27 
 * Parameter string: name from n1 to n2 [prompt plist]
 27 
 * Parameter string: name from n1 to n2 [prompt plist]
28 
 * or name, list slist [prompt plist]
 28 
 * or name, list slist [prompt plist]
29 
 * Using script to do this is too slow. */
 29 
 * Using script to do this is too slow.
- 
 
 30 
 */
30 
void _form_menus(char *p,int kind)
 31 
void _form_menus(char *p,int kind)
31 
{
 32 
{
32 
    char *n, *li, *pp, *val, *p0, *p1, *p2, *pc, *s, *pfre="";
 33 
    char *n, *li, *pp, *val, *p0, *p1, *p2, *pc, *s, *pfre="";
33 
    char *vlist[MAX_MENU_ITEMS], *plist[MAX_MENU_ITEMS];
 34 
    char *vlist[MAX_MENU_ITEMS], *plist[MAX_MENU_ITEMS];
34 
    char nbuf[MAX_LINELEN+1],vbuf[MAX_LINELEN+1],pbuf[MAX_LINELEN+1];
 35 
    char nbuf[MAX_LINELEN+1],vbuf[MAX_LINELEN+1],pbuf[MAX_LINELEN+1];