<set-var title="Infodrom Oldenburg">>
<html>
-<head><title><get-var title></title></head>
+<head>
+<title><get-var title></title>
+<meta name="author" content="joey@infodrom.north.de (Martin Schulze)">
+<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+</head>
<body bgcolor="#ffffff" text="#000000" vlink="#000090" alink="#e709f7" link="#1717ef">
<: main_menu (); :>
#<hr>
# © = ©
-<address>© <a href="<root_prefix>Infodrom/impressum.html">Infodrom Oldenburg</a>, <:
+<address><small>© <a href="<root_prefix>Infodrom/impressum.html">Infodrom Oldenburg</a>, <:
@months =
("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
"<get-var WML_SRC_ISOTIME>" =~ /^(\d+)-(\d+)-(\d+)\s/;
printf "Last modified: %d. %s %d", $3, $months[$2], $1;
-:></address>
+:></small></address>
</body>
</html>
</define-tag>
+<define-tag flaglink whitespace=delete>
+<preserve url lang>
+<set-var %attributes>
+<div align=right>
+<a href="<get-var url>"><img src="<root_prefix>gifs/flag-<get-var lang>.gif" width=20 height=13 border=0 alt=""></a>
+</div>
+# The events pages need an extra space between flag and red line
+<:
+ if ("<get-var WML_SRC_DIRNAME>" =~ /src\/Debian\/events\/.*/) {
+ print "<p>";
+ }
+:>
+<restore url lang>
+</define-tag>
# <db>
# Name der Haupt-Datenbank fuer diesen Bereich