From 160be29a0dc62e79a4fb95d2ab8c0c7e5996760e Mon Sep 17 00:00:00 2001 From: cvs2git Date: Mon, 12 Aug 2002 06:17:10 +0000 Subject: This commit was manufactured by cvs2svn to create branch 'BESTPRACTICAL'. --- rt/webrt/Elements/Login | 69 ------------------------------------------------- 1 file changed, 69 deletions(-) delete mode 100755 rt/webrt/Elements/Login (limited to 'rt/webrt/Elements/Login') 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" , &> - -
-% if ($Error) { -<& /Elements/TitleBoxStart, title => 'Error' &> -<% $Error %> -<& /Elements/TitleBoxEnd &> -% } -
-<& /Elements/TitleBoxStart, width=> "40%", titleright => "RT $RT::VERSION for $RT::rtname", title => 'Login' , -contentbg=>"#cccccc" &> - - -% unless ($RT::WebExternalAuth) { -
- - - - - -
Username:
Password:
- -
-<&/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}}) { - -% } -% } -% else { - -% } -% } -%} -% } -
-% } -
- -
- -
-
-RT is © Copyright 1996-2002 Jesse Vincent <jesse@bestpractical.com>. It is -distributed under Version 2 of the GNU General Public License. - - -<%ARGS> -$user => "" -$pass => undef -$goto => undef -$Error => undef - - -<%INIT> -SetContentType('text/html'); - -- cgit v1.2.1