Remove broken debug line and update import/export filter fields to us…

…e filter value from the query when generating the form
eprints · Jul 18, 2022 · dd18186 · dd18186
1 parent 9d67f86
commit dd18186
Show file tree

Hide file tree

Showing 5 changed files with 578 additions and 574 deletions.
diff --git a/lib/plugins/EPrints/Plugin/Screen/ExportToOrcid.pm b/lib/plugins/EPrints/Plugin/Screen/ExportToOrcid.pm
@@ -435,7 +435,8 @@ sub render_filter_date_form
     }
 
     $filter_date_form->appendChild( $self->html_phrase( "show_last_modified" ) );
-    my $date_picker =  $xml->create_element( "input", type => "date", name => "filter_date", "aria-label" => "Filter Date" );
+    my $date_picker = $xml->create_element( "input", type => "date", name => "filter_date", "aria-label" => "Filter Date", value => $query->param('filter_date') );
+
     $filter_date_form->appendChild( $date_picker );
     $filter_date_form->appendChild( $xml->create_element( "input", type => "submit", class => "ep_form_action_button filter", value => $self->phrase( "filter" ) ) );
     $filter_div->appendChild( $filter_date_form );

diff --git a/lib/plugins/EPrints/Plugin/Screen/ImportFromOrcid.pm b/lib/plugins/EPrints/Plugin/Screen/ImportFromOrcid.pm
@@ -330,7 +330,8 @@ sub render_filter_date_form
 
     my $date_type = $repo->config( "orcid_support_advance", "filter_date" ) || "last-modified-date";
     $filter_date_form->appendChild( $self->html_phrase( "show_$date_type" ) );
-    my $date_picker =  $xml->create_element( "input", type => "date", name => "filter_date", "aria-label" => "Filter Date" );
+    my $date_picker = $xml->create_element( "input", type => "date", name => "filter_date", "aria-label" => "Filter Date", value => $query->param('filter_date') );
+
     $filter_date_form->appendChild( $date_picker );
     $filter_date_form->appendChild( $xml->create_element( "input", type => "submit", class => "ep_form_action_button filter", value => $self->phrase( "filter" ) ) );
     $filter_div->appendChild( $filter_date_form );

diff --git a/lib/plugins/EPrints/Plugin/Screen/Report/Orcid/CheckName.pm b/lib/plugins/EPrints/Plugin/Screen/Report/Orcid/CheckName.pm
@@ -85,7 +85,7 @@ sub items
 
         $list->map(sub{
             my( $session, $dataset, $user ) = @_;
-		print SDTERR "user: " . $user->id . "\n";
+
             my @problems = $self->validate_dataobj( $user );
 
             if( ( scalar( @problems ) > 0 ) && ( $user->is_set( "orcid" ) ) )