%# BEGIN BPS TAGGED BLOCK {{{
%#
%# COPYRIGHT:
%#
%# This software is Copyright (c) 1996-2025 Best Practical Solutions, LLC
%#                                          <sales@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
%#
%#
%# LICENSE:
%#
%# This work is made available to you under the terms of Version 2 of
%# the GNU General Public License. A copy of that license should have
%# been provided with this software, but in any event can be snarfed
%# from www.gnu.org.
%#
%# This work is distributed in the hope that it will be useful, but
%# WITHOUT ANY WARRANTY; without even the implied warranty of
%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
%# General Public License for more details.
%#
%# You should have received a copy of the GNU General Public License
%# along with this program; if not, write to the Free Software
%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
%# 02110-1301 or visit their web page on the internet at
%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
%#
%#
%# CONTRIBUTION SUBMISSION POLICY:
%#
%# (The following paragraph is not intended to limit the rights granted
%# to you to modify and distribute this software under the terms of
%# the GNU General Public License and is only of importance to you if
%# you choose to contribute your changes and enhancements to the
%# community by submitting them to Best Practical Solutions, LLC.)
%#
%# By intentionally submitting any modifications, corrections or
%# derivatives to this work, or any other work intended for use with
%# Request Tracker, to Best Practical Solutions, LLC, you confirm that
%# you are the copyright holder for those contributions and you grant
%# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,
%# royalty-free, perpetual, license to use, copy, create derivative
%# works based on those contributions, and sublicense and distribute
%# those contributions and any derivatives thereof.
%#
%# END BPS TAGGED BLOCK }}}
% if ( $ShowForm ) {
<form method="post" action="<% $FormAction || '?' %>">
  <input type="hidden" name="Page" value="<% $Page || '' %>">
  <div class="row mt-2">
    <div class="col-12">
      <div class="form-check">
        <input type="checkbox" class="form-check-input checkbox" id="IncludeDisabled" name="IncludeDisabled" value="1" <% $IncludeDisabled? 'checked': '' %> />
        <label class="form-check-label" for="IncludeDisabled"><&|/l&>Include disabled dashboards in listing.</&></label>
      </div>
    </div>
  </div>
  <& /Elements/Submit, Label => loc('Go!'), FullWidth => 1 &>
% }

% foreach my $Object (@Objects) {
%   my $Dashboards = $Object->Dashboards;
%   $Dashboards->FindAllRows if $IncludeDisabled;
%   $Dashboards->RowsPerPage( $Rows ) if $Rows;
%   $Dashboards->GotoPage( $Page - 1 ) if $Page;
%   my $title;
%   if (ref $Object eq 'RT::User' && $Object->Id == $session{CurrentUser}->Id) {
%       $title = loc("My dashboards");
%   } else {
%       $title = loc("[_1]'s dashboards",$Object->Name);
%   }
%   $title =~ s/([\\'])/\\$1/g;
%   $title = $m->interp->apply_escapes($title, 'h');
%   my $format = qq{'<a href="__WebPath__/__ShowURL__">__Name__</a>/TITLE:$title', __Subscription__,};
%   if ( $ShowForm && RT::Dashboard->new( $session{CurrentUser} )->CurrentUserCanModify($Object) ) {
%       $format .= q{__DisabledEdit__};
%       $ShowSubmit ||= 1 if $Dashboards->Count;
%   }
%   else {
%       $format .= q{__Disabled__};
%   }
<& /Elements/CollectionList,
    %ARGS,
    Format => $format,
    Collection => $Dashboards,
    PassArguments => [qw(IncludeDisabled RowsPerPage id)],
&>
% }
% if ( $ShowForm ) {
%   if ($ShowSubmit) {
      <& /Elements/Submit, Name => 'Update', Label => loc('Update'), FullWidth => 1 &>
%   }
</form>
% }
<%init>
my $ShowSubmit = 0;
my @Objects = $Object ? $Object : RT::Dashboard->new($session{CurrentUser})->ObjectsForLoading();
</%init>

<%ARGS>
$Rows => undef
$Page => undef
$IncludeDisabled => undef
$Object => undef
$ShowForm => undef
$FormAction => undef
</%ARGS>
