<%$Title%>

From ded0451e9582df33cae6099a2fb72b4ea25076cf Mon Sep 17 00:00:00 2001 From: ivan Date: Tue, 15 Jul 2003 13:30:43 +0000 Subject: reverting to vendor branch rt 3.0.4, hopefully --- rt/webrt/Elements/Checkbox | 17 ---- rt/webrt/Elements/CreateTicket | 1 - rt/webrt/Elements/CustomHomepageHeader | 0 rt/webrt/Elements/Error | 23 ------ rt/webrt/Elements/Footer | 10 --- rt/webrt/Elements/GotoTicket | 1 - rt/webrt/Elements/Header | 61 -------------- rt/webrt/Elements/ListActions | 14 ---- rt/webrt/Elements/Login | 69 ---------------- rt/webrt/Elements/MessageBox | 30 ------- rt/webrt/Elements/MyRequests | 45 ----------- rt/webrt/Elements/MyTickets | 43 ---------- rt/webrt/Elements/Quicksearch | 41 ---------- rt/webrt/Elements/Refresh | 22 ----- rt/webrt/Elements/Section | 11 --- rt/webrt/Elements/SelectBoolean | 24 ------ rt/webrt/Elements/SelectDate | 25 ------ rt/webrt/Elements/SelectDateRelation | 14 ---- rt/webrt/Elements/SelectDateType | 12 --- rt/webrt/Elements/SelectEqualityOperator | 18 ----- rt/webrt/Elements/SelectKeyword | 38 --------- rt/webrt/Elements/SelectKeywordOptions | 18 ----- rt/webrt/Elements/SelectLinkType | 16 ---- rt/webrt/Elements/SelectMatch | 31 ------- rt/webrt/Elements/SelectNewTicketQueue | 9 --- rt/webrt/Elements/SelectOwner | 22 ----- rt/webrt/Elements/SelectQueue | 38 --------- rt/webrt/Elements/SelectResultsPerPage | 22 ----- rt/webrt/Elements/SelectSortOrder | 18 ----- rt/webrt/Elements/SelectStatus | 17 ---- rt/webrt/Elements/SelectTicketSortBy | 15 ---- rt/webrt/Elements/SelectUsers | 8 -- rt/webrt/Elements/SelectWatcherType | 26 ------ rt/webrt/Elements/ShadedBox | 5 -- rt/webrt/Elements/Submit | 44 ---------- rt/webrt/Elements/Tabs | 133 ------------------------------- rt/webrt/Elements/TitleBoxEnd | 10 --- rt/webrt/Elements/TitleBoxStart | 20 ----- rt/webrt/Elements/ViewUser | 29 ------- rt/webrt/Elements/dayMenu | 19 ----- rt/webrt/Elements/monthMenu | 37 --------- rt/webrt/Elements/yearMenu | 24 ------ 42 files changed, 1080 deletions(-) delete mode 100755 rt/webrt/Elements/Checkbox delete mode 100644 rt/webrt/Elements/CreateTicket delete mode 100644 rt/webrt/Elements/CustomHomepageHeader delete mode 100755 rt/webrt/Elements/Error delete mode 100755 rt/webrt/Elements/Footer delete mode 100644 rt/webrt/Elements/GotoTicket delete mode 100755 rt/webrt/Elements/Header delete mode 100755 rt/webrt/Elements/ListActions delete mode 100755 rt/webrt/Elements/Login delete mode 100644 rt/webrt/Elements/MessageBox delete mode 100644 rt/webrt/Elements/MyRequests delete mode 100644 rt/webrt/Elements/MyTickets delete mode 100644 rt/webrt/Elements/Quicksearch delete mode 100644 rt/webrt/Elements/Refresh delete mode 100755 rt/webrt/Elements/Section delete mode 100755 rt/webrt/Elements/SelectBoolean delete mode 100755 rt/webrt/Elements/SelectDate delete mode 100755 rt/webrt/Elements/SelectDateRelation delete mode 100755 rt/webrt/Elements/SelectDateType delete mode 100755 rt/webrt/Elements/SelectEqualityOperator delete mode 100644 rt/webrt/Elements/SelectKeyword delete mode 100644 rt/webrt/Elements/SelectKeywordOptions delete mode 100644 rt/webrt/Elements/SelectLinkType delete mode 100644 rt/webrt/Elements/SelectMatch delete mode 100755 rt/webrt/Elements/SelectNewTicketQueue delete mode 100755 rt/webrt/Elements/SelectOwner delete mode 100755 rt/webrt/Elements/SelectQueue delete mode 100644 rt/webrt/Elements/SelectResultsPerPage delete mode 100644 rt/webrt/Elements/SelectSortOrder delete mode 100755 rt/webrt/Elements/SelectStatus delete mode 100644 rt/webrt/Elements/SelectTicketSortBy delete mode 100755 rt/webrt/Elements/SelectUsers delete mode 100644 rt/webrt/Elements/SelectWatcherType delete mode 100755 rt/webrt/Elements/ShadedBox delete mode 100755 rt/webrt/Elements/Submit delete mode 100755 rt/webrt/Elements/Tabs delete mode 100755 rt/webrt/Elements/TitleBoxEnd delete mode 100755 rt/webrt/Elements/TitleBoxStart delete mode 100644 rt/webrt/Elements/ViewUser delete mode 100755 rt/webrt/Elements/dayMenu delete mode 100755 rt/webrt/Elements/monthMenu delete mode 100755 rt/webrt/Elements/yearMenu (limited to 'rt/webrt/Elements') diff --git a/rt/webrt/Elements/Checkbox b/rt/webrt/Elements/Checkbox deleted file mode 100755 index 964c482ba..000000000 --- a/rt/webrt/Elements/Checkbox +++ /dev/null @@ -1,17 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/Checkbox,v 1.1 2002-08-12 06:17:08 ivan Exp $ -> - -<%ARGS> -$Name => undef -$Default => undef -$True => undef -$False => undef -$IsChecked => undef - - -<%INIT> -$IsChecked = - ($Default && $Default =~ /checked/i) - ? " CHECKED " : ""; -1; - diff --git a/rt/webrt/Elements/CreateTicket b/rt/webrt/Elements/CreateTicket deleted file mode 100644 index 1270f6ebe..000000000 --- a/rt/webrt/Elements/CreateTicket +++ /dev/null @@ -1 +0,0 @@ - diff --git a/rt/webrt/Elements/CustomHomepageHeader b/rt/webrt/Elements/CustomHomepageHeader deleted file mode 100644 index e69de29bb..000000000 diff --git a/rt/webrt/Elements/Error b/rt/webrt/Elements/Error deleted file mode 100755 index ec2cf511f..000000000 --- a/rt/webrt/Elements/Error +++ /dev/null @@ -1,23 +0,0 @@ -<& /Elements/Header, Code => $Code, Why => $Why &> -<& /Elements/Tabs &> -<& /Elements/TitleBoxStart, title => $Title &> -<%$Why%> -
- -<%$Details%> - -<& /Elements/TitleBoxEnd &> - - - - -<%args> -$Code => undef -$Details => undef -$Title => "RT Error" -$Why => "the calling component did not specify why" - - -<%INIT> -$RT::Logger->error("WebRT: $Why ($Details)"); - diff --git a/rt/webrt/Elements/Footer b/rt/webrt/Elements/Footer deleted file mode 100755 index 776c219bb..000000000 --- a/rt/webrt/Elements/Footer +++ /dev/null @@ -1,10 +0,0 @@ -% if ($Debug) { -

-Time to display: <%time - $m->{'rt_base_time'} %> -% } - - - -<%ARGS> -$Debug => 0 - diff --git a/rt/webrt/Elements/GotoTicket b/rt/webrt/Elements/GotoTicket deleted file mode 100644 index 21d2bcdf8..000000000 --- a/rt/webrt/Elements/GotoTicket +++ /dev/null @@ -1 +0,0 @@ - diff --git a/rt/webrt/Elements/Header b/rt/webrt/Elements/Header deleted file mode 100755 index 471331be2..000000000 --- a/rt/webrt/Elements/Header +++ /dev/null @@ -1,61 +0,0 @@ - - - -<%$Title%> - - -%# TODO this gets called from error. but I have no idea what it might -%# be used for. can we whack it? -jesse -% if ($Code) { - -% } -% if ($Refresh > 0) { - -% } - - - - -% if ($ShowBar) { - - - - - - -

- - -<%$Title%> - - -

- -% if ($session{'CurrentUser'}) { -Signed in as <%$session{'CurrentUser'}->Name%>.
-% if ($session{'CurrentUser'}->HasSystemRight('ModifySelf')) { -[Preferences] -% } -% unless ($RT::WebExternalAuth) { -[Logout] -% } -% } else { -Not logged in. -% } - -

- -
-% } -<%ARGS> -$Title => 'WebRT' -$Code => undef -$Refresh => undef -$Why => undef -$BgColor => '#ffffff' -$ShowBar => 1 - -<%INIT> -$Title = "RT/$RT::rtname: ".$Title; - - diff --git a/rt/webrt/Elements/ListActions b/rt/webrt/Elements/ListActions deleted file mode 100755 index 3fc9b0ba5..000000000 --- a/rt/webrt/Elements/ListActions +++ /dev/null @@ -1,14 +0,0 @@ -% if (@actions ) { -<& /Elements/TitleBoxStart, title => 'Results' &> -

<%$action%>

-<& /Elements/TitleBoxEnd &> -
-% } -<%ARGS> -@actions => undef - 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) { - -% } -

- -
- -
-

-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'); - diff --git a/rt/webrt/Elements/MessageBox b/rt/webrt/Elements/MessageBox deleted file mode 100644 index aa081a380..000000000 --- a/rt/webrt/Elements/MessageBox +++ /dev/null @@ -1,30 +0,0 @@ - -<%INIT> - -my ($message); - -if ($MessageURI) { - my $code; - ($code, $Default)=RT::Link->GetContent($MessageURI); -} -if ($QuoteTransaction) { - my $transaction=RT::Transaction->new($session{'CurrentUser'}); - $transaction->Load($QuoteTransaction); - $message=$transaction->Content(Quote => 1); -} - -my $signature = ''; -if ($session{'CurrentUser'}->UserObj->Signature) { - $signature = "-- \n".$session{'CurrentUser'}->UserObj->Signature; -} - - -<%ARGS> -$QuoteTransaction => undef -$Name => 'Content' -$Default => '' -$DefaultURI => undef -$Width => 72 -$MessageURI => undef - - diff --git a/rt/webrt/Elements/MyRequests b/rt/webrt/Elements/MyRequests deleted file mode 100644 index 67817296c..000000000 --- a/rt/webrt/Elements/MyRequests +++ /dev/null @@ -1,45 +0,0 @@ -<& /Elements/TitleBoxStart, title => "25 highest priority tickets I requested..." &> - - - - - - - - - -% while (my $Ticket = $MyTickets->Next) { - - - - - -% } -

#	Subject	Queue	Status	Owner
-<%$Ticket->Id%> -	- -<%$Ticket->Subject \|\| '[no subject]'%> - -	-<%$Ticket->QueueObj->Name%> -	-<%$Ticket->Status%> -	-<%$Ticket->OwnerObj->Name%> -	-[Display] -

-<& /Elements/TitleBoxEnd &> - - -<%INIT> -my $MyTickets; -$MyTickets = new RT::Tickets ($session{'CurrentUser'}); -$MyTickets->LimitRequestor(VALUE => $session{'CurrentUser'}->EmailAddress); -$MyTickets->LimitStatus(VALUE => "open"); -$MyTickets->LimitStatus(VALUE => "new"); -$MyTickets->OrderBy(FIELD => 'Priority', ORDER => 'DESC'); -$MyTickets->RowsPerPage(25); - - diff --git a/rt/webrt/Elements/MyTickets b/rt/webrt/Elements/MyTickets deleted file mode 100644 index 64a2ba7cc..000000000 --- a/rt/webrt/Elements/MyTickets +++ /dev/null @@ -1,43 +0,0 @@ -<& /Elements/TitleBoxStart, title => "25 highest priority tickets I own..." &> - - - - - - - - -% while (my $Ticket = $MyTickets->Next) { - - - - - - -% } -

#	Subject	Queue	Status
-<%$Ticket->Id%> -	- -<%$Ticket->Subject \|\| '[no subject]'%> - -	-<%$Ticket->QueueObj->Name%> -	-<%$Ticket->Status%> -	-[Update] -

-<& /Elements/TitleBoxEnd &> - - -<%INIT> -my $MyTickets; -$MyTickets = new RT::Tickets ($session{'CurrentUser'}); -$MyTickets->LimitOwner(VALUE => $session{'CurrentUser'}->Id); -$MyTickets->LimitStatus(VALUE => "open"); -$MyTickets->LimitStatus(VALUE => "new"); -$MyTickets->OrderBy(FIELD => 'Priority', ORDER => 'DESC'); -$MyTickets->RowsPerPage(25); - - diff --git a/rt/webrt/Elements/Quicksearch b/rt/webrt/Elements/Quicksearch deleted file mode 100644 index d44c996fa..000000000 --- a/rt/webrt/Elements/Quicksearch +++ /dev/null @@ -1,41 +0,0 @@ -<& /Elements/TitleBoxStart, title => "Find new/open tickets", titleright => "Advanced Search" &> - - - - - - - - - -<%PERL> -while (my $queue = $Queues->Next) { - $Tickets->ClearRestrictions; - $Tickets->LimitStatus(VALUE => "open"); - $Tickets->LimitQueue(VALUE => $queue->id, OPERATOR => '='); - my $open = $Tickets->Count(); - - $Tickets->ClearRestrictions; - $Tickets->LimitStatus(VALUE => "new"); - $Tickets->LimitQueue(VALUE => $queue->id, OPERATOR => '='); - my $new = $Tickets->Count(); - - $Tickets->ClearRestrictions; - $Tickets->LimitStatus(VALUE => "stalled"); - $Tickets->LimitQueue(VALUE => $queue->id, OPERATOR => '='); - my $stalled = $Tickets->Count(); - - - - - - -% } -

Queue	New	Open	Stalled
<%$queue->Name%>	<%$new%>	<%$open%>	<%$stalled%>

-<& /Elements/TitleBoxEnd &> - -<%INIT> -my $Queues = new RT::Queues($session{'CurrentUser'}); -$Queues->UnLimit(); -my $Tickets = new RT::Tickets ($session{'CurrentUser'}); - diff --git a/rt/webrt/Elements/Refresh b/rt/webrt/Elements/Refresh deleted file mode 100644 index 6949d8c24..000000000 --- a/rt/webrt/Elements/Refresh +++ /dev/null @@ -1,22 +0,0 @@ - - -<%INIT> -my @refreshevery = qw(120 300 600 1200 3600 7200); - -<%ARGS> -$Name => undef -$Default => undef - diff --git a/rt/webrt/Elements/Section b/rt/webrt/Elements/Section deleted file mode 100755 index 067311d9e..000000000 --- a/rt/webrt/Elements/Section +++ /dev/null @@ -1,11 +0,0 @@ - - - - -

-<%$title%> -

- -<%ARGS> -$title => undef - \ No newline at end of file diff --git a/rt/webrt/Elements/SelectBoolean b/rt/webrt/Elements/SelectBoolean deleted file mode 100755 index 93b78ce76..000000000 --- a/rt/webrt/Elements/SelectBoolean +++ /dev/null @@ -1,24 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectBoolean,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - -<%ARGS> -$Name => undef -$True => "is" -$Default => 'true' -$TrueVal => 1 -$FalseVal => 0 -$False => "isn't" - - -<%INIT> -my ($TrueDefault, $FalseDefault); -if ($Default && $Default !~ /true/i) { - $FalseDefault = "SELECTED"; -} -else { - $TrueDefault = "SELECTED"; -} - diff --git a/rt/webrt/Elements/SelectDate b/rt/webrt/Elements/SelectDate deleted file mode 100755 index 6fafbf170..000000000 --- a/rt/webrt/Elements/SelectDate +++ /dev/null @@ -1,25 +0,0 @@ - - -<%init> -unless ((defined $Default) or - ($current <= 0)) { - my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = - localtime($current); - $Default = sprintf("%04d-%02d-%02d %02d:%02d", - $year+1900,$mon+1,$mday, - $hour,$min); -} - -unless ($Name) { - $Name = $menu_prefix. "_Date"; -} - - -<%args> - -$ShowTime => undef -$menu_prefix=>'' -$current=>time -$Default => undef -$Name => undef - diff --git a/rt/webrt/Elements/SelectDateRelation b/rt/webrt/Elements/SelectDateRelation deleted file mode 100755 index c5849c8e2..000000000 --- a/rt/webrt/Elements/SelectDateRelation +++ /dev/null @@ -1,14 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectDateRelation,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - -<%ARGS> -$Name => undef -$Default => undef -$Before => 'Before' -$On => 'On' -$After => 'After' - diff --git a/rt/webrt/Elements/SelectDateType b/rt/webrt/Elements/SelectDateType deleted file mode 100755 index 65c0e9b4b..000000000 --- a/rt/webrt/Elements/SelectDateType +++ /dev/null @@ -1,12 +0,0 @@ - -<%ARGS> -$Name => 'DateType' - diff --git a/rt/webrt/Elements/SelectEqualityOperator b/rt/webrt/Elements/SelectEqualityOperator deleted file mode 100755 index f93dc1af2..000000000 --- a/rt/webrt/Elements/SelectEqualityOperator +++ /dev/null @@ -1,18 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectEqualityOperator,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - -<%ARGS> -$Name => undef -@Options => ('less than', 'equal to', 'greater than', 'not equal to') -@Values => qw(< = > !=) -$Default => undef - diff --git a/rt/webrt/Elements/SelectKeyword b/rt/webrt/Elements/SelectKeyword deleted file mode 100644 index c4bd9e1aa..000000000 --- a/rt/webrt/Elements/SelectKeyword +++ /dev/null @@ -1,38 +0,0 @@ - - - -<%INIT> - -unless (defined $KeywordObj) { - $KeywordObj = new RT::Keyword($session{'CurrentUser'}); - $KeywordObj->Load($Root); -} -my $Descendents = $KeywordObj->Descendents(); - -if ($Multiple) { - $Multiple = "MULTIPLE"; -} -if ($Size) { - $Size="SIZE=$Size"; -} - - - -<%ARGS> -$Multiple => undef -$Size => undef -$Name => 'Keyword' -$KeywordObj => undef -$Root => 0 -$Default => undef - diff --git a/rt/webrt/Elements/SelectKeywordOptions b/rt/webrt/Elements/SelectKeywordOptions deleted file mode 100644 index f56dfe52c..000000000 --- a/rt/webrt/Elements/SelectKeywordOptions +++ /dev/null @@ -1,18 +0,0 @@ - -while (my $keyword = $keywords->Next()) { - my ($selected); - if $keyword->Id == $default - - -<& SelectKeywordOptions, depth => ($depth+1), root => $keyword->id &> -%} -<%INIT> - -my $keywords = new RT::Keywords($session{'CurrentUser'}); -$keywords->LimitToParent($root); - - -<%ARGS> -$root => undef -$depth => 0 - \ No newline at end of file diff --git a/rt/webrt/Elements/SelectLinkType b/rt/webrt/Elements/SelectLinkType deleted file mode 100644 index 22cde3dff..000000000 --- a/rt/webrt/Elements/SelectLinkType +++ /dev/null @@ -1,16 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectLinkType,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - - -<%ARGS> -$Name => "LinkType" -$Default => undef - - -<%INIT> -# TODO handle Default - diff --git a/rt/webrt/Elements/SelectMatch b/rt/webrt/Elements/SelectMatch deleted file mode 100644 index 7f3a94fae..000000000 --- a/rt/webrt/Elements/SelectMatch +++ /dev/null @@ -1,31 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectMatch,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - -<%ARGS> -$Name => undef -$Like => 'contains' -$NotLike => "doesn't contain" -$True => 'is' -$False => "isn't" -$Default => undef - -<%INIT> -my ($TrueDefault, $FalseDefault, $LikeDefault, $NotLikeDefault); -if ($Default && $Default !~ /true/i) { - $FalseDefault = "SELECTED"; -} -elsif ($Default && $Default !~ /false/i) { - $TrueDefault = "SELECTED"; -} -elsif ($Default && $Default !~ /notlike/i) { - $NotLikeDefault = "SELECTED"; -} -else { - $LikeDefault = "SELECTED"; -} - diff --git a/rt/webrt/Elements/SelectNewTicketQueue b/rt/webrt/Elements/SelectNewTicketQueue deleted file mode 100755 index 9f5cd2871..000000000 --- a/rt/webrt/Elements/SelectNewTicketQueue +++ /dev/null @@ -1,9 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectNewTicketQueue,v 1.1 2002-08-12 06:17:08 ivan Exp $ -<& SelectQueue, Name => $Name, Verbose => $Verbose, Default => $Default, - ShowAllQueues => 0, ShowNullOption => 0 &> - -<%ARGS> -$Name => 'Queue' -$Verbose => undef -$Default => undef - diff --git a/rt/webrt/Elements/SelectOwner b/rt/webrt/Elements/SelectOwner deleted file mode 100755 index 59ebf3631..000000000 --- a/rt/webrt/Elements/SelectOwner +++ /dev/null @@ -1,22 +0,0 @@ - - -<%INIT> -my $Users = RT::Users->new($session{CurrentUser}); -$Users->LimitToPrivileged; - - -<%ARGS> -$QueueObj => undef -$Name => undef -$Default => undef -$User => undef -$TicketObj => undef - diff --git a/rt/webrt/Elements/SelectQueue b/rt/webrt/Elements/SelectQueue deleted file mode 100755 index d63b17b4e..000000000 --- a/rt/webrt/Elements/SelectQueue +++ /dev/null @@ -1,38 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectQueue,v 1.1 2002-08-12 06:17:08 ivan Exp $ - -% if ($Lite) { - -% } else { - -% } -<%ARGS> -$ShowNullOption => 1 -$ShowAllQueues => 1 -$Name => undef -$Verbose => undef -$Default => undef -$Lite => 0 - - -<%INIT> - -my $q=new RT::Queues($session{'CurrentUser'}); -$q->UnLimit; - -my $d = new RT::Queue($session{'CurrentUser'}); -$d->Load($Default); - - diff --git a/rt/webrt/Elements/SelectResultsPerPage b/rt/webrt/Elements/SelectResultsPerPage deleted file mode 100644 index 0699c6868..000000000 --- a/rt/webrt/Elements/SelectResultsPerPage +++ /dev/null @@ -1,22 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectResultsPerPage,v 1.1 2002-08-12 06:17:08 ivan Exp $ - -%# TODO: Better default handling - - - -<%INIT> -my @values = qw(0 10 25 50 100); -my @labels = qw(Unlimited 10 25 50 100); - -<%ARGS> - -$Name => undef -$Default => 50 - - diff --git a/rt/webrt/Elements/SelectSortOrder b/rt/webrt/Elements/SelectSortOrder deleted file mode 100644 index 6dc900631..000000000 --- a/rt/webrt/Elements/SelectSortOrder +++ /dev/null @@ -1,18 +0,0 @@ - - -<%INIT> -my @orders = qw (ASC DESC); -my @order_names = qw (Ascending Descending); - - - -<%ARGS> -$Name => 'SortOrder' -$Default => 'ASC' - diff --git a/rt/webrt/Elements/SelectStatus b/rt/webrt/Elements/SelectStatus deleted file mode 100755 index 92df7c619..000000000 --- a/rt/webrt/Elements/SelectStatus +++ /dev/null @@ -1,17 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectStatus,v 1.1 2002-08-12 06:17:08 ivan Exp $ - - -<%ONCE> -my $queue = new RT::Queue($session{'CurrentUser'}); -my @status = $queue->StatusArray(); - -<%ARGS> -$Name => undef -$Default => undef - - diff --git a/rt/webrt/Elements/SelectTicketSortBy b/rt/webrt/Elements/SelectTicketSortBy deleted file mode 100644 index 02021decc..000000000 --- a/rt/webrt/Elements/SelectTicketSortBy +++ /dev/null @@ -1,15 +0,0 @@ - - -<%INIT> -my $tickets = new RT::Tickets($session{'CurrentUser'}); -my @sortfields = $tickets->SortFields(); - - -<%ARGS> -$Name => 'SortTicketsBy' -$Default => 'id' - diff --git a/rt/webrt/Elements/SelectUsers b/rt/webrt/Elements/SelectUsers deleted file mode 100755 index f517d3510..000000000 --- a/rt/webrt/Elements/SelectUsers +++ /dev/null @@ -1,8 +0,0 @@ - -<& /Elements/SelectMatch, Name=> 'UserOp' &> - diff --git a/rt/webrt/Elements/SelectWatcherType b/rt/webrt/Elements/SelectWatcherType deleted file mode 100644 index 5a855192c..000000000 --- a/rt/webrt/Elements/SelectWatcherType +++ /dev/null @@ -1,26 +0,0 @@ -%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Elements/Attic/SelectWatcherType,v 1.1 2002-08-12 06:17:08 ivan Exp $ -%# portions Copyright 2000 Tobias Brox -%# Request Tracker is Copyright 1996-2000 Jesse Vincent - - - -<%INIT> -my @types; -if ($Scope =~ 'queue') { - @types = qw(Cc AdminCc); -} -else { - @types = qw(Requestor Cc AdminCc); -} - -<%ARGS> -$Default=>undef -$Scope => 'ticket' -$Name => 'WatcherType' - diff --git a/rt/webrt/Elements/ShadedBox b/rt/webrt/Elements/ShadedBox deleted file mode 100755 index 334b57975..000000000 --- a/rt/webrt/Elements/ShadedBox +++ /dev/null @@ -1,5 +0,0 @@ -

<%$title |n %>
<%$content |n %>

-<%ARGS> -$title => undef -$content => " " - diff --git a/rt/webrt/Elements/Submit b/rt/webrt/Elements/Submit deleted file mode 100755 index 7b75e9e98..000000000 --- a/rt/webrt/Elements/Submit +++ /dev/null @@ -1,44 +0,0 @@ - - -% if ($Reset) { - -%} - - - -

- - - -

- -

- - - -% if ($AlternateLabel) { -<%$AlternateCaption%> - -% } - -<%$Caption%> - -

-<%ARGS> -$color => "#336699" -$Caption => undef -$AlternateCaption => undef -$AlternateLabel => undef -$Label => 'Submit' -$Name => undef -$Reset => undef -$ResetLabel => 'Reset' - diff --git a/rt/webrt/Elements/Tabs b/rt/webrt/Elements/Tabs deleted file mode 100755 index 6eacf391a..000000000 --- a/rt/webrt/Elements/Tabs +++ /dev/null @@ -1,133 +0,0 @@ - - - - - -

- - -% foreach $tab (sort keys %{$toptabs}) { - -% } - -

- - [{$tab}->{'path'}) { -class='currenttab' -% } - HREF="<%$RT::WebPath%>/<% $toptabs->{$tab}->{'path'}%>"><% $toptabs->{$tab}->{'title'}%>] - - - -

-
-% if ($tabs_scalar) { -<% $tabs_scalar |n%> -% } -% if ($tabs) { - - - -% foreach $tab (sort keys %{$tabs}) { - -%} - -

-[{$tab}->{'path'}) { -class='currenttab' -% } -HREF="<%$RT::WebPath%>/<% $tabs->{$tab}->{'path'}%>"><% $tabs->{$tab}->{'title'}%>]

-%} - -
-% if ($subtabs_scalar) { -<% $subtabs_scalar |n%> -% } -% if ($subtabs) { - - -% foreach $tab (sort keys %{$subtabs}) { - -%} - -

- [<% $subtabs->{$tab}->{'title'}%>] -

-%} -

- - - -% foreach $action (sort keys %{$topactions}) { - -% } - -

<%$topactions->{"$action"}->{'html'} |n %>

- - - -% if ($actions) { - -% foreach $action (sort keys %{$actions}) { - -% } -

- -% if ($actions->{"$action"}->{'html'}) { -<%$actions->{"$action"}->{'html'} |n%> -% } else { -<% $actions->{$action}->{'title'}%> -% } - -

-% } - -% if ($subactions_scalar) { -<% $subactions_scalar |n%> -% } -% if ($subactions) { -
| -% foreach $action (sort keys %{$subactions}) { -<%$subactions->{"$action"}->{'html'} |n%> | -% } -% } -

- - -<%INIT> -my ($tab, $action); -my $toptabs = { A => { title => 'Home', - path => '', - }, - B => { title => 'Search', - path => 'Search/Listing.html' - }, - - D => { title => 'Configuration', - path => 'Admin/' - } - }; - - -my $topactions = { - A => { html => $m->scomp('/Elements/CreateTicket') - }, - B => { html => $m->scomp('/Elements/GotoTicket') - } - }; - -<%ARGS> -$current_toptab => "none" -$current_tab => "none" -$current_subtab => "none" -$tabs => undef -$tabs_scalar => undef -$subtabs => undef -$actions => undef -$subactions => undef -$subtabs_scalar => undef -$subactions_scalar => undef - - diff --git a/rt/webrt/Elements/TitleBoxEnd b/rt/webrt/Elements/TitleBoxEnd deleted file mode 100755 index bdd41065a..000000000 --- a/rt/webrt/Elements/TitleBoxEnd +++ /dev/null @@ -1,10 +0,0 @@ - - - - - -<%ARGS> -$title => undef -$content => undef - - diff --git a/rt/webrt/Elements/TitleBoxStart b/rt/webrt/Elements/TitleBoxStart deleted file mode 100755 index 6d0f1f91a..000000000 --- a/rt/webrt/Elements/TitleBoxStart +++ /dev/null @@ -1,20 +0,0 @@ - - - - - -

<% $title_href && ""|n%><%$title |n %><% $title_href && "" |n%>

<%$titleright |n %>

-<%ARGS> -$width => "100%" -$class => undef - -$title_href => undef -$title => undef -$title_class => undef - -$titleright_href => undef -$titleright => undef -$contentbg => "#dddddd" -$color => "#336699" - diff --git a/rt/webrt/Elements/ViewUser b/rt/webrt/Elements/ViewUser deleted file mode 100644 index 92446e6ef..000000000 --- a/rt/webrt/Elements/ViewUser +++ /dev/null @@ -1,29 +0,0 @@ - -<& /Elements/TitleBoxStart, - title => "id."\">Tickets from $name", - titleright=> "id."\">Comments about $name" &> - - - - -

-%while (my $w=$tickets->Next) { -<%$w->Id%>: <%$w->Subject%> (<%$w->Status%>)
-%} -

- <% ($User->Comments || "No comment entered about this user") %> -

-<& /Elements/TitleBoxEnd &> - -<%ARGS> -$User=>undef - - -<%INIT> -my $name=$User->RealName || $User->EmailAddress; - -my $tickets = new RT::Tickets($session{'CurrentUser'}); -$tickets->LimitRequestor(VALUE => $User->EmailAddress); - - - diff --git a/rt/webrt/Elements/dayMenu b/rt/webrt/Elements/dayMenu deleted file mode 100755 index 6591b05d2..000000000 --- a/rt/webrt/Elements/dayMenu +++ /dev/null @@ -1,19 +0,0 @@ -<%doc>------------------------------------------------------------------- -dayMenu: Display a pulldown menu of days of the month (1 to 31) - -Optional arguments: -$menu_name - Name of menu, defaults to 'day' -$current - Selected day value (1 to 31) -------------------------------------------------------------------- - - - -<%args> -$menu_name=>'day' -$current=>undef - diff --git a/rt/webrt/Elements/monthMenu b/rt/webrt/Elements/monthMenu deleted file mode 100755 index b9a71d3f9..000000000 --- a/rt/webrt/Elements/monthMenu +++ /dev/null @@ -1,37 +0,0 @@ -<%doc>------------------------------------------------------------------- -monthMenu: Display a pulldown menu of months - -Optional arguments: -$menu_name - Name of menu, defaults to 'month' -$current - Selected month value (1 to 12) -$format - Choice of month labels: - 'full' (January, February, ...) - 'short' (Jan, Feb, ...) - 'numeric' (1, 2, ...) - Defaults to 'full'. The format only affects appearance; the menu - values are always numeric. -------------------------------------------------------------------- - - - -<%init> -my @month_names = qw(January February March April May June July August September October November December); - - -<%args> -$menu_name=>'month' -$current=>undef -$format=>'full' - diff --git a/rt/webrt/Elements/yearMenu b/rt/webrt/Elements/yearMenu deleted file mode 100755 index 4a0e7a772..000000000 --- a/rt/webrt/Elements/yearMenu +++ /dev/null @@ -1,24 +0,0 @@ -<%doc>------------------------------------------------------------------- -yearMenu: Display a pulldown menu of years. - -Optional arguments: -$menu_name - Name of menu, defaults to 'year' -$current - Selected year value -$min - Minimum year appearing in menu; defaults to current year -$max - Maximum year appearing in menus; defaults to $min plus 10. -------------------------------------------------------------------- - - - -<%args> -$menu_name=>'year' -$current=>(localtime)[5]+1900 -$min=>(localtime)[5]+1900-1 -$max=>$min+10 - -- cgit v1.2.1

Username:
Password:
- -