html/Callbacks/ImportCustomFieldValues/Elements/Tabs/Privileged

   1 <%INIT>
   2 my $request_path = $HTML::Mason::Commands::r->path_info;
   3 if ( $request_path =~ qr{^/Admin/CustomFields/} && $m->request_args->{'id'} &&  $m->request_args->{'id'} =~ /^\d+$/ ) {
   4     my $tabs = PageMenu;
   5     my $CustomField = RT::CustomField->new( $session{'CurrentUser'} );
   6     $CustomField->Load($m->request_args->{'id'});
   7     if ( $CustomField->Type && $CustomField->Type eq 'Select' ) {
   8         $tabs->child(
   9             'cf-import-values' => title => loc('Import from CSV'),
  10             path => '/Admin/CustomFields/ImportValues.html?id=' . $m->request_args->{'id'}
  11         );
  12     }
  13 }
  14
  15 </%INIT>