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

version» Context lines:

Roxen.git/server/modules/tags/obox.pike:1:   // The outlined box module   //   // Fredrik Noring et al   //   // Several modifications by Francesco Chemolli.       - constant cvs_version = "$Id: obox.pike,v 1.9 1998/11/22 17:02:50 per Exp $"; + constant cvs_version = "$Id: obox.pike,v 1.10 1999/01/15 12:35:03 neotron Exp $";   constant thread_safe=1;      #include <module.h>   inherit "module";   inherit "roxenlib";      constant unit_gif = "/internal-roxen-unit";      static private int loaded;   
Roxen.git/server/modules/tags/obox.pike:47:   }      static string title(mapping args)   {    if (!args->title)    return horiz_line(args);    string empty=img_placeholder(args);    switch (args->style) {    case "groupbox":    if (!args->left && !args->fixedleft) -  if (args->width && !args->fixedright) args->fixedleft = "7"; else args->left = "1"; -  if (!args->right && !args->fixedright) args->right = "1"; +  if (args->width && !args->fixedright) +  args->fixedleft = "7"; +  else +  args->left = "1"; +  if (!args->right && !args->fixedright) +  args->right = "1";    return sprintf("<tr><td colspan=2><font size=-3>&nbsp;</font></td>\n"    "<td rowspan=3%s>&nbsp;<b>" /* bgcolor */    "%s%s%s" /* titlecolor, title, titlecolor */    "</b>&nbsp;</td>\n"    "<td colspan=2><font size=-3>&nbsp;</font></td></tr>\n"    "<tr%s>" /* bgcolor */    "<td bgcolor=\"%s\" colspan=2>\n" /* outlinecolor */    "%s</td>\n" /* empty */    "<td bgcolor=\"%s\" colspan=2>\n"    "%s</td></tr>\n" /* empty */
Roxen.git/server/modules/tags/obox.pike:128:    args->style = args->style || "groupbox";    if (!args->title) {    contents=parse_html(contents,([]),(["title":handle_title,]),args);    }       switch (name) {    case "obox":    s = title(args);    s = "<table border=0 cellpadding=0 cellspacing=0" +    (args->align?" align="+args->align:"") + -  (args->width ? " width=" + args->width : -  (!args->fixedleft && !args->fixedright ? " width=1" : "")) + ">\n" + +  (args->width ? " width=" + args->width : "") + ">\n" +    s +    "<tr" +    (args->bgcolor?" bgcolor="+args->bgcolor:"") +    "><td bgcolor=\"" + args->outlinecolor + "\">" +    img_placeholder(args) + "</td>\n"    "<td" + (args->width && !args->fixedleft && !args->fixedright ? " width=1" : "") +    (args->aligncontents ? " align=" + args->aligncontents : "") + " colspan=3" + ">\n"    "<table border=0 cellspacing=0 cellpadding=" + (args->padding || "5") +    (args->spacing?" width="+(string)args->spacing:"")+">"    "<tr><td>\n";