Roxen.git
/
server
/
modules
/
tags
/
obox.pike
version
»
Context lines:
10
20
40
80
file
none
3
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.
14
1999/
07
/
26
13
:
15
:
01
nilsson Exp $";
+
constant cvs_version = "$Id: obox.pike,v 1.
15
1999/
08
/
16
20
:
40
:
37
nilsson 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:72:
"%s</td></tr>\n" /* empty */ "<tr%s><td bgcolor=\"%s\">" /* bgcolor, outlinecolor */ "%s</td>\n" /* empty */ "<td%s><font size=\"-3\">%s</font></td>" /* left, fixedleft */ "<td%s><font size=\"-3\">%s</font></td>\n" /* right, fixedright */ "<td bgcolor=\"%s\">" /* outlinecolor */ "%s</td></tr>\n" /* empty */ , args->bgcolor ? " bgcolor=\""+args->bgcolor+"\"" : "",
-
args->titlecolor ? "<
FONT
color=\""+args->titlecolor+"\">" : "",
+
args->titlecolor ? "<
font
color=\""+args->titlecolor+"\">" : "",
args->title,
-
args->titlecolor ? "</
FONT
>" : "",
+
args->titlecolor ? "</
font
>" : "",
args->bgcolor ? " bgcolor=\""+args->bgcolor+"\"" : "", args->outlinecolor, empty, args->outlinecolor, empty, args->bgcolor ? " bgcolor=\""+args->bgcolor+"\"" : "", args->outlinecolor, empty, (args->left ? " width="+args->left : ""), (args->fixedleft ?
Roxen.git/server/modules/tags/obox.pike:111:
"%s</td></tr>\n" /* empty */ "<tr bgcolor=\"%s\"><td>" /* outlinecolor */ "%s</td>\n" /* empty */ "<td%s><font size=\"-3\">%s</font></td>" /* left, fixedleft */ "<td%s><font size=\"-3\">%s</font></td>\n" /* right, fixedright */ "<td bgcolor=\"%s\">" /* outlinecolor */ "%s</td></tr>\n" /* empty */ , args->outlinecolor ? " bgcolor=\""+args->outlinecolor+"\"" : "",
-
args->titlecolor ? "<
FONT
color=\""+args->titlecolor+"\">" : "",
+
args->titlecolor ? "<
font
color=\""+args->titlecolor+"\">" : "",
args->title,
-
args->titlecolor ? "</
FONT
>" : "",
+
args->titlecolor ? "</
font
>" : "",
args->outlinecolor, empty, empty, args->outlinecolor, empty, (args->left ? " width="+args->left : ""), (args->fixedleft ? String.strmult (" ", (int) args->fixedleft) : " "), (args->right ? " width="+args->right : ""), (args->fixedright ?
Roxen.git/server/modules/tags/obox.pike:148:
contents = doc(); } // Set the defaults... args->outlinecolor = args->outlinecolor || "#000000"; 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+"\"" : "") + ">\n" +
-
s
+
+
title(args)
+
"<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 && args->width?" width=\""+(string)((int)args->width-((int)args->outlinewidth*2||2))+"\"":"")+
(args->spacing?" width=\""+(string)args->spacing+"\"":"")+">" "<tr><td>\n";
-
if (args->textcolor)
{
+
if (args->textcolor)
s += "<font color=\""+args->textcolor+"\">" + contents + "</font>";
-
}
else
{
+
else
s += contents;
-
}
+
s += "</td></tr></table>\n" "</td><td bgcolor=\"" + args->outlinecolor + "\">" + img_placeholder(args) + "</td></tr>\n" + horiz_line(args) + "</table>\n";
-
break;
-
}
-
+
return s; } array register_module() { return ({ MODULE_PARSER, ([ "standard":"Outlined box", "svenska":"RamlÄda",