diff options
Diffstat (limited to 'rt/webrt/Elements/Login')
-rwxr-xr-x | rt/webrt/Elements/Login | 69 |
1 files changed, 0 insertions, 69 deletions
diff --git a/rt/webrt/Elements/Login b/rt/webrt/Elements/Login deleted file mode 100755 index 27ec98281..000000000 --- a/rt/webrt/Elements/Login +++ /dev/null @@ -1,69 +0,0 @@ -<& /Elements/Header, Title=>"Login" , &> - -<DIV ALIGN=CENTER> -% if ($Error) { -<& /Elements/TitleBoxStart, title => 'Error' &> -<% $Error %> -<& /Elements/TitleBoxEnd &> -% } -<BR> -<& /Elements/TitleBoxStart, width=> "40%", titleright => "RT $RT::VERSION for $RT::rtname", title => 'Login' , -contentbg=>"#cccccc" &> - - -% unless ($RT::WebExternalAuth) { -<FORM METHOD=POST > -<TABLE BORDER=0 WIDTH=100%> -<TR ALIGN=RIGHT> -<TD ALIGN=RIGHT>Username:</TD><TD ALIGN=LEFT><input name=user value="<%$user%>"></TD></TR> -<TR><TD ALIGN=RIGHT>Password:</TD><TD ALIGN=LEFT><input type=password name=pass></TD></TR> -<TR><TD colspan=2 align=right> -<input type=submit Value="Login"> -</TD></TR> -</TABLE> -<&/Elements/TitleBoxEnd&> -% # From mason 1.0.1 forward, this doesn't work. in fact, it breaks things. -% if (0) { -% # The code below iterates through everything in the passed in arguments -% # Preserving all the old parameters -% # This would be easier, except mason is 'smart' and calls multiple values -% # arrays rather than multiple hash keys -% my $key; my $val; -% foreach $key (keys %ARGS) { -% if (($key ne 'user') and ($key ne 'pass')) { -% if (ref($ARGS{$key}) =~ /ARRAY/) { -% foreach $val (@{$ARGS{$key}}) { -<input type=hidden name="<%$key %>" value="<% $val %>"> -% } -% } -% else { -<input type="hidden" name="<% $key %>" value="<% $ARGS{$key} %>"> -% } -% } -%} -% } -</FORM> -% } -</DIV> - -<BR> -<!-- TODO: not yet implemented -If you've forgotten your username or password, RT can <A -href="/NoAuth/Reminder.html">send you a reminder</a>. ---> -<BR> -<HR> -RT is © Copyright 1996-2002 Jesse Vincent <jesse@bestpractical.com>. It is -distributed under <a href="http://www.gnu.org/copyleft/gpl.html">Version 2 of the GNU General Public License.</a> - - -<%ARGS> -$user => "" -$pass => undef -$goto => undef -$Error => undef -</%ARGS> - -<%INIT> -SetContentType('text/html'); -</%INIT> |