Branch: Tag:

1998-11-09

1998-11-09 22:01:03 by Marcus Comstedt <marcus@mc.pp.se>

Evil kludge.

Rev: server/base_server/wizard.pike:1.76

1: - /* $Id: wizard.pike,v 1.75 1998/11/09 18:28:00 marcus Exp $ + /* $Id: wizard.pike,v 1.76 1998/11/09 22:01:03 marcus Exp $    * name="Wizard generator";    * doc="This file generats all the nice wizards";    */
382:    int page = ((int)id->variables->_page);    mapping foo = ([]);    // Cannot easily be inlined below, believe me... Side-effects. -  form = parse_html(form,([ "var":wizard_tag_var, ]), +  form = parse_html(form,(id->misc->extra_wizard_tags||([]))+ +  ([ "var":wizard_tag_var, ]), +  (id->misc->extra_wizard_container||([]))+    ([ "cvar":wizard_tag_var,    "help":parse_wizard_help]), id, foo );