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.
15
1999/
08
/
16
20
:
40
:
37
nilsson Exp $";
+
constant cvs_version = "$Id: obox.pike,v 1.
16
1999/
10
/
04
11
:
34
:
33
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:150:
// Set the defaults... args->outlinecolor = args->outlinecolor || "#000000"; args->style = args->style || "groupbox"; if (!args->title) { contents=parse_html(contents,([]),(["title":handle_title,]),args); } s = "<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\"" + (args->align?" align=\""+args->align+"\"":"") +
-
(args->width ? " width=
\
"" + args->
width+
"
\
"" : "") + ">\n" +
+
(args->width ? " width="
+ args->width :
"
")
+
+
(
args->
hspace ?
"
hspace=
"
+ args->hspace :
"
")
+
+
(args->vspace ? " vspace=" + args->vspace
: "") +
">\n" +
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+"\"":"")+">"