1 <& /Elements/Header, Title=>"Login" , &>
5 <& /Elements/TitleBoxStart, title => 'Error' &>
7 <& /Elements/TitleBoxEnd &>
10 <& /Elements/TitleBoxStart, width=> "40%", titleright => "RT $RT::VERSION for $RT::rtname", title => 'Login' ,
11 contentbg=>"#cccccc" &>
14 % unless ($RT::WebExternalAuth) {
16 <TABLE BORDER=0 WIDTH=100%>
18 <TD ALIGN=RIGHT>Username:</TD><TD ALIGN=LEFT><input name=user value="<%$user%>"></TD></TR>
19 <TR><TD ALIGN=RIGHT>Password:</TD><TD ALIGN=LEFT><input type=password name=pass></TD></TR>
20 <TR><TD colspan=2 align=right>
21 <input type=submit Value="Login">
24 <&/Elements/TitleBoxEnd&>
25 % # From mason 1.0.1 forward, this doesn't work. in fact, it breaks things.
27 % # The code below iterates through everything in the passed in arguments
28 % # Preserving all the old parameters
29 % # This would be easier, except mason is 'smart' and calls multiple values
30 % # arrays rather than multiple hash keys
32 % foreach $key (keys %ARGS) {
33 % if (($key ne 'user') and ($key ne 'pass')) {
34 % if (ref($ARGS{$key}) =~ /ARRAY/) {
35 % foreach $val (@{$ARGS{$key}}) {
36 <input type=hidden name="<%$key %>" value="<% $val %>">
40 <input type="hidden" name="<% $key %>" value="<% $ARGS{$key} %>">
50 <!-- TODO: not yet implemented
51 If you've forgotten your username or password, RT can <A
52 href="/NoAuth/Reminder.html">send you a reminder</a>.
56 RT is © Copyright 1996-2002 Jesse Vincent <jesse@bestpractical.com>. It is
57 distributed under <a href="http://www.gnu.org/copyleft/gpl.html">Version 2 of the GNU General Public License.</a>
68 SetContentType('text/html');