2 # Global color definition
4 <define-tag black>000000</define-tag>
5 <define-tag white>ffffff</define-tag>
7 #<define-tag bgcolor>39dff7</define-tag>
8 <define-tag bgcolor>f7f7f7</define-tag>
9 <define-tag textcolor>000000</define-tag>
10 <define-tag submenubgcolor>ededff</define-tag>
12 <define-tag menu-bgcolor>80CCF8</define-tag>
13 <define-tag menu-bgcolorsel>68A4C8</define-tag>
14 <define-tag menu-fgcolor>008dfd</define-tag>
15 <define-tag box-bdcolor>008dfd</define-tag>
16 <define-tag box-bgcolor><bgcolor></define-tag>
17 <define-tag box-fgcolor>1014e8</define-tag>
18 <define-tag box-blue>4876ff</define-tag>
20 # Generelle Konstanten
22 <define-tag colh>#abdcfc</define-tag>
23 <define-tag cold>#ededff</define-tag>
24 <define-tag coln>#ffffff</define-tag>
26 # Alternatives Farbschema
27 # <define-tag bgcolor>ffffff</define-tag>
28 # <define-tag textcolor>000000</define-tag>
29 # <define-tag submenubgcolor>eff0f1</define-tag>
31 # <define-tag colh>#abdcfc</define-tag>
32 # <define-tag cold>#eff0f1</define-tag>
33 # <define-tag coln>#ffffff</define-tag>
35 <define-tag ifont endtag=required whitespace=delete>
36 <font face="Helvetica,Arial,Sans-Serif">%body</font>
39 <define-tag lightblue>#e2f6ff</define-tag>
41 #<define-tag mehr><img src="<root_prefix>gifs/lt2k-mehr.gif" width=45 height=14 alt="*mehr*"></define-tag>
42 #<define-tag phpmehr><img src=\"<root_prefix>gifs/lt2k-mehr.gif\" width=\"45\" height=\"14\" alt=\"*mehr*\" border=\"0\"></define-tag>
43 <define-tag mehr><img src="<root_prefix>gifs/mehr.gif" width=45 height=14 alt="*mehr*"></define-tag>
44 <define-tag phpmehr><img src=\"<root_prefix>gifs/mehr.gif\" width=\"45\" height=\"14\" alt=\"*mehr*\" border=\"0\"></define-tag>
48 <define-tag page-footer>
50 <hr><address>© <a href="http://www.infodrom.ffis.de/">Infodrom Oldenburg</a>, <:
52 # ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
53 ("Dummy", "January","February","March","April","May","June","July","August","September","October","November","December");
55 if (length ("<get-var source>")) {
56 if ("<get-var source>" ne ".") {
57 $url = "<get-var source>";
62 "<get-var WML_SRC_DIRNAME>/" =~ /.*\/(src\/.*)$/;
63 $url = sprintf ($cvsurl, $1, "<get-var WML_SRC_FILENAME>");
66 "<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
68 printf "<a href=\"%s\">page source</a> last modified: %s %d, %d.", $url, $months[$2], $3, $1;
70 printf "page source last modified: %s %d, %d.", $months[$2], $3, $1;
75 # ========== Abstand berechnen ==========
76 # in ePerl: $root_prefix
77 # in WML: <get-var root_prefix>
79 $root_prefix = "<get-var WML_SRC_DIRNAME>";
80 $root_prefix =~ s/^.*src\/?(.*)$/$1/;
81 @foo = split (/\//, $root_prefix);
82 $root_prefix = "../"x($#foo+1);
84 <if <not <get-var root_prefix>>
85 <define-tag root_prefix><: print "$root_prefix"; :></define-tag>
86 "<: $root_var = \"<get-var root_prefix>\"; :>"
89 # Used for menus in submenu.inc, link=foo.html is optional, only required for .php3
90 <define-tag menu-item whitespace=delete>
91 <preserve base text href>
94 <if <not <get-var href>>
95 <set-var href="<get-var base>.html">>
97 <ifneq <get-var WML_SRC_BASENAME> "<get-var base>" "<a href="<get-var href>">" "">
99 <ifneq <get-var WML_SRC_BASENAME> "<get-var base>" "</a>" "">
101 <restore base text href>
104 # Path to the download area
106 <define-tag download whitespace=delete>
107 <root_prefix>download/