File: head.pl

package info (click to toggle)
webmin-ldap-netgroups 0.17
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 240 kB
  • ctags: 35
  • sloc: perl: 856; makefile: 65; sh: 15
file content (46 lines) | stat: -rw-r--r-- 1,260 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
#Webmin is FUBAR. Using its header()-call makes the whole thing hang
#in unstable, so this is a dirty workaround.

sub head
{
	return qq~
<!doctype html public "-//W3C//DTD HTML 3.2 Final//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; Charset=iso-8859-1">
<title>$text{title1}</title>

<script language="JavaScript">
<!--
var mOvrClass='';
function mOvr(src,clrOver) {
 if (clrOver == undefined) {
 var clrOver='hover'};
 mOvrClass = src.className;
 //src.className = mOvrClass + ' ' + clrOver; 
 src.className = clrOver; 
 }
function mOut(src) {
 src.className=mOvrClass;
}

//-->
</script>
<link href="netgroup.css" rel="stylesheet" type="text/css">
	<script language=JavaScript type=text/javascript>
defaultStatus="root logged into Webmin 1.150 on debian (Debian GNU/Linux 3.0)";
</SCRIPT>
</head>
<body bgcolor=#ffffff link=#0000ee vlink=#0000ee text=#000000   >
<table class=header width=100%><tr>
<td width=15% valign=top align=left><a href='/?cat=system'>Webmin Index</a><br>
<a href="/ldap-netgroups/">Module Index</a><br>
<a href="/config.cgi?ldap-netgroups">Module Config</a><br>
</td>
<td align=center width=70%><h1 style="font-size:180%">$text{title1}</td>
<td width=15% valign=top align=right></td></tr></table>
~;

}

1;