422a015a0605c06278e69ee0de8cff1c76957a1d
[infodrom.org/lists.infodrom.org] / Styles / infodrom.style
1 #include <basic.style>
2 #include <tools.inc>
3 #include <menu.style>
4 #use wml::std::box
5 #use wml::std::info
6
7 <define-tag page endtag=required>
8 <preserve title menugbcolor keywords source>
9 <set-var %attributes>
10
11 <if <not <get-var title>>
12     <set-var title="Infodrom Oldenburg">>
13 <if <not <get-var menubgcolor>>
14     <set-var menubgcolor="<submenubgcolor>">>
15
16 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
17 <html>
18 <head>
19 <title><get-var title></title>
20 <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
21 <meta name="Author"    content="joey@infodrom.org (Martin Schulze)">
22 <if <get-var keywords>
23 <meta name="Keywords"  content="<get-var keywords>">
24 >
25 <info style=meta domainname="infodrom.org" copyright="(c) Martin Schulze, Infodrom Oldenburg, reuse has to be negotiated">
26 <link href="<root_prefix>infodrom.css" rel="stylesheet" type="text/css">
27 </head>
28 <body>
29
30
31 <: main_menu (); :>
32 <table border=0 cellpadding=0 cellspacing=0 width=100%>
33 <tr>
34 #  <td align=left valign=top width=10% bgcolor=#eff0f1><font face="Helvetica,Arial" size=-1 color="#<menu-fgcolor>">
35 <td align=left valign=top width=10% bgcolor=#<get-var menubgcolor>><font color="#<menucolor>">
36
37 #include "submenu.inc"
38
39   <p>
40   </font></td>
41   <td valign=top><img src=<root_prefix>gifs/imgdot-1x1-transp.gif width=3 height=0 alt=""></td>
42   <td valign=top align=left width=90%>
43
44 %body
45
46   </td>
47 </tr>
48 </table>
49
50 <line color=<menu-fgcolor> height=1 align=center>
51 #<hr>
52
53 # &copy; = &#169;
54 <address><small>&copy; <a href="http://www.infodrom.org/Infodrom/impressum.html">Infodrom Oldenburg</a>, <:
55 $cvsurl = "http://cvs.infodrom.org/lists.infodrom.org/%s%s?cvsroot=infodrom.org";
56 @months =
57     ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
58
59 "<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
60 printf "last modified: %s %d, %d", $months[$2], $3, $1;
61
62 if (length ("<get-var source>")) {
63     if ("<get-var source>" ne ".") {
64         $url = "<get-var source>";
65     } else {
66         $url = '';
67     }
68 } else {
69     "<get-var WML_SRC_DIRNAME>/" =~ /.*\/(src\/.*)$/;
70     $url = sprintf ($cvsurl, $1, "<get-var WML_SRC_FILENAME>");
71 }
72
73 printf ", <a href=\"%s\">page source</a>", $url if (length ($url));
74
75 print ".";
76 :></small></address>
77
78 </body>
79 </html>
80 <restore title menubgcolor keywords source>
81 </define-tag>
82
83 <define-tag flaglink whitespace=delete>
84 <preserve url lang>
85 <set-var %attributes>
86 <div align=right>
87 <a href="<get-var url>"><img src="<root_prefix>gifs/flag-<get-var lang>.gif" width=20 height=13 border=0 alt="<get-var lang>"></a>
88 </div>
89 # The events pages need an extra space between flag and red line
90 <:
91   if ("<get-var WML_SRC_DIRNAME>" =~ /src\/Debian\/events\/.*/) {
92     print "<p>";
93   }
94 :>
95 <restore url lang>
96 </define-tag>
97
98 <define-tag frontad>
99 <table width=100% border=0>
100 <tr>
101   <td align=left valign=top>
102      <a href="http://www.linuxtag.org/"><img src="<root_prefix>gifs/lt2kblue.gif" width=100 height=66 alt="LinuxTag 2003 - July 10-13 2003" border=0></a>
103 #     <font face="Helvetica,Arial"><a href="http://oldenburger.linuxtage.de/"><b>Oldenburger LinuxTag</b></a></font>
104   </td>
105   <td align=right valign=top>
106      <a href="<root_prefix>Linux/"><img src="<root_prefix>gifs/powered_by_linux.gif" alt="Powered by Linux" width=180 height=70 border=0></a>
107   </td>
108 </tr>
109 </table>
110 </define-tag>
111
112 # <db>
113 #   Name der Haupt-Datenbank fuer diesen Bereich
114 #
115 #   OBSOLETE!!!!!!!!!!
116 <define-tag db>web</define-tag>