blob: 471331be2fa780775cd4c74e1ac8b040f8cb37cb (
plain)
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<HTML>
<HEAD>
<TITLE><%$Title%></TITLE>
<META HTTP-EQUIV="PRAGMA" CONTENT="NO-CACHE">
%# TODO this gets called from error. but I have no idea what it might
%# be used for. can we whack it? -jesse
% if ($Code) {
<META HTTP-EQUIV VALUE="<%$Code%> <%$Why%>">
% }
% if ($Refresh > 0) {
<META HTTP-EQUIV="REFRESH" CONTENT="<%$Refresh%>">
% }
<link rel="stylesheet" href="<%$RT::WebPath%>/NoAuth/webrt.css" type="text/css">
</HEAD>
<BODY BGCOLOR="<%$BgColor%>">
% if ($ShowBar) {
<TABLE BORDER=0 WIDTH=100% CELLSPACING=0 BGCOLOR="#993333">
<TR VALIGN=TOP>
<TD><IMG SRC="<%$RT::LogoURL%>" alt="RT"></TD>
<TD VALIGN=CENTER ALIGN=LEFT>
<font size=+2 color="#ffffff">
<B>
<%$Title%>
</B>
</font>
</TD>
<TD ALIGN=RIGHT>
<font color="#ffffff">
% if ($session{'CurrentUser'}) {
Signed in as <b><%$session{'CurrentUser'}->Name%></b>.<BR>
% if ($session{'CurrentUser'}->HasSystemRight('ModifySelf')) {
[<A class='inverse' HREF="<%$RT::WebPath%>/User/Prefs.html" >Preferences</A>]
% }
% unless ($RT::WebExternalAuth) {
[<A class='inverse' HREF="<%$RT::WebPath%>/NoAuth/Logout.html">Logout</a>]
% }
% } else {
Not logged in.
% }
</font>
</TD>
</TR>
</TABLE>
<BR>
% }
<%ARGS>
$Title => 'WebRT'
$Code => undef
$Refresh => undef
$Why => undef
$BgColor => '#ffffff'
$ShowBar => 1
</%ARGS>
<%INIT>
$Title = "RT/$RT::rtname: ".$Title;
</%INIT>
|
