X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=rt%2Fshare%2Fhtml%2FAdmin%2FUsers%2Findex.html;h=31e1c122df65bf88122744fa25ad2321210168c4;hb=b8988e1d3ac75af63c85e8563e57701030315a9e;hp=6561abf86edaa518caa2c22139aa3847f641a2f8;hpb=fc6209f398899f0211cfcedeb81a3cd65e04a941;p=freeside.git diff --git a/rt/share/html/Admin/Users/index.html b/rt/share/html/Admin/Users/index.html index 6561abf86..31e1c122d 100755 --- a/rt/share/html/Admin/Users/index.html +++ b/rt/share/html/Admin/Users/index.html @@ -2,7 +2,7 @@ %# %# COPYRIGHT: %# -%# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +%# This software is Copyright (c) 1996-2014 Best Practical Solutions, LLC %# %# %# (Except where explicitly superseded by other copyright notices) @@ -46,15 +46,51 @@ %# %# END BPS TAGGED BLOCK }}} <& /Admin/Elements/Header, Title => loc('Select a user') &> -<& /Admin/Elements/UserTabs, current_tab => 'Admin/Users/', - current_subtab => 'Admin/Users/', - Title => loc('Select a user') &> - +<& /Elements/Tabs &> +

<% $caption %>

-

<&|/l&>Select a user:

+ +
+% foreach my $field( qw(Format Rows Page Order OrderBy) ) { +% next unless defined $ARGS{ $field } && length $ARGS{ $field }; + +% } + + +<&|/l&>Go to user + + +
+ +
+% foreach my $field( qw(Format Rows Page Order OrderBy) ) { +% next unless defined $ARGS{ $field } && length $ARGS{ $field }; + +% } +<&|/l&>Find all users whose <& /Elements/SelectUsers, %ARGS, Fields => \@fields &>
+ /> +<&|/l&>Include disabled users in search. +
+
+
+ % unless ( $users->Count ) { <&|/l&>No users matching search criteria found. % } else { +

<&|/l&>Select a user:

<& /Elements/CollectionList, OrderBy => 'Name', @@ -67,29 +103,8 @@ PassArguments => [qw(Format Rows Page Order OrderBy UserString UserOp UserField IdLike EmailLike FindDisabledUsers)], &> -% my $ids = join ',', map $_->id, @{ $users->ItemsArrayRef }; -% if ( $ids ) { -
-( -<&|/l&>Download as a tab-delimited file -)
% } -

-% } - -
-% foreach my $field( qw(Format Rows Page Order OrderBy) ) { -% next unless defined $ARGS{ $field } && length $ARGS{ $field }; - -% } -<&|/l&>Find all users whose <& /Elements/SelectUsers, %ARGS &>
- /> -<&|/l&>Include disabled users in search. -
-
-
- <%INIT> my $caption; my $users = RT::Users->new( $session{'CurrentUser'} ); @@ -111,6 +126,8 @@ if ( defined($UserString) && length $UserString ) { VALUE => $UserString, ); } + RT::Interface::Web::Redirect(RT->Config->Get('WebURL')."Admin/Users/Modify.html?id=".$users->First->id) + if $users->Count == 1; } else { $caption = loc("Privileged users"); @@ -119,6 +136,29 @@ else { $Format ||= RT->Config->Get('AdminSearchResultFormat')->{'Users'}; +# Build up the list of fields to display for searching +my $i = 0; +my %sorted = map { $_ => $i++ } qw( + Name EmailAddress RealName Organization NickName WorkPhone HomePhone + MobilePhone PagerPhone Address1 Address2 City State Zip Country + Timezone Lang Gecos Comments +); + +my @attrs = sort { $sorted{$a} <=> $sorted{$b} } + grep { !/(?:^id$|ContactInfo|Encoding|^External|System|PGPKey|AuthToken|^Last|^Creat(?:ed|or)$|^Signature$)/ } + RT::User->ReadableAttributes; +my @fields; + +for my $name (@attrs) { + my $label = $m->comp( + '/Elements/ColumnMap', + Class => 'RT__User', + Name => $name, + Attr => 'title' + ); + + push @fields, [ $name, $label || $name ]; +} <%ARGS> $Format => undef,