Roxen.git / server / modules / tags / wizard_tag.pike

version» Context lines:

Roxen.git/server/modules/tags/wizard_tag.pike:1:   /* This is a Roxen Challenger(r) module. Copyright (c) Idonex 1997.    * Released under GPL    * made by Per Hedbor    */    - constant cvs_version = "$Id: wizard_tag.pike,v 1.15 1998/08/18 13:31:54 wellhard Exp $"; + constant cvs_version = "$Id: wizard_tag.pike,v 1.16 1998/08/19 11:55:22 grubba Exp $";   constant thread_safe=1;   #include <module.h>   inherit "module";   inherit "wizard";      mixed *register_module()   {    return ({MODULE_PARSER,"Wizard generator",    "Generates wizards<p>See &lt;wizard help&gt; for more information\n",    ({}),1,});
Roxen.git/server/modules/tags/wizard_tag.pike:94:    "}\n\n");   #endif /* __VERSION__ >= 0.6 */    }       parse_html_lines(contents,    ([]),    ([ "page":internal_page,    "done":internal_done ]),    (int)id->misc->line,f);    if (f->done && !args->ok) { + #if __VERSION__ >= 0.6 +  pike += sprintf("mixed wizard_done(object id)\n" +  "{\n" +  " return parse_rxml(%O, id);\n" +  "}\n", f->done); + #else    pike += ("mixed wizard_done(object id)\n"    "{\n"    " return parse_rxml(\""+replace(f->done,    ({"\"","\n","\r", "\\"}),    ({"\\\"", "\\n", "\\r", "\\\\"}))+    "\",id);\n"    "}\n"); -  + #endif /* __VERSION__ >= 0.6 */    }    foreach(f->pages, array q)    {   #if __VERSION__ >= 0.6    pike += sprintf("# "+q[1]+" %O\n", id->not_query);    pike += sprintf("string page_"+p+"(object id) {" +    " return %O;\n"    "}\n", q[0]);   #else    pike += ("# "+q[1]+" \""+id->not_query+"\"\n");