Add orcid fields to searches

cfg/cfg.d/z_orcid_support.pl

@@ -24,8 +24,8 @@ =head2 Changes
 $c->{plugins}{"Export::Report::CSV::CreatorsOrcid"}{params}{disable} = 0;
 
 #---Users---#
-#add orcid field to the user profile's 
-#but checking first to see if the field is already present in the user dataset before adding it 
+#add orcid field to the user profile's
+#but checking first to see if the field is already present in the user dataset before adding it
 my $orcid_present = 0;
 for(@{$c->{fields}->{user}})
 {
@@ -63,7 +63,7 @@ =head2 Changes
 				last;
 		        }
 		}
-		
+
 		#add orcid subfield
 		if( !$orcid_present )
 		{
@@ -74,9 +74,9 @@ =head2 Changes
         		                input_cols => 19,
                         	 	allow_null => 1,
 	                        }
-			));	
+			));
 		}
-	}	
+	}
 }
 
 #automatic update of eprint creator field
@@ -117,7 +117,7 @@ =head2 Changes
 		$eprint->set_value("creators", \@new_creators);
 	}
 
-	
+
 }, priority => 50 );
 
 #automatic update of eprint editor field
@@ -158,29 +158,42 @@ =head2 Changes
 		$eprint->set_value("editors", \@new_editors);
 	}
 
-	
+
 }, priority => 50 );
 
+#---Search Fields---#
+# Eprints advanced search
+my $orcid_search_fields = { meta_fields => [] };
+foreach my $role (@{$c->{orcid}->{eprint_fields}})
+{
+    my $field = $role.'_orcid';
+    push @{$orcid_search_fields->{meta_fields}}, $field;
+}
+push @{$c->{search}->{advanced}->{search_fields}}, $orcid_search_fields;
+
+# User search
+my $user_search_field = { meta_fields => [ "orcid" ] };
+push @{$c->{search}->{user}->{search_fields}}, $user_search_field;
 
 #Rendering ORCIDs
 {
 package EPrints::Script::Compiled;
 use strict;
- 
+
 sub run_people_with_orcids
 {
 	my( $self, $state, $value ) = @_;
- 
+
 	my $session = $state->{session};
 	my $r = $state->{session}->make_doc_fragment;
- 
+
 	my $creators = $value->[0];
- 
+
 	foreach my $i (0..$#$creators)
 	{
- 
+
 		my $creator = @$creators[$i];
- 
+
 		if( $i > 0 )
 		{
 			#not first item (or only one item)
@@ -194,25 +207,25 @@ sub run_people_with_orcids
 			        $r->appendChild( $session->make_text( ", " ) );
 			}
 		}
- 
+
 		my $person_span = $session->make_element( "span", "class" => "person" );
 		$person_span->appendChild( $session->render_name( $creator->{name} ) );
- 
+
 		my $orcid = $creator->{orcid};
 		if( defined $orcid && $orcid =~ m/^(?:orcid.org\/)?(\d{4}\-\d{4}\-\d{4}\-\d{3}(?:\d|X))$/ )
 		{
-			my $orcid_link = $session->make_element( "a", 
+			my $orcid_link = $session->make_element( "a",
 				"class" => "orcid",
 				"href" => "https://orcid.org/$1",
 				"target" => "_blank",
 			 );
 			$orcid_link->appendChild( $session->make_element( "img", "src" => "/images/orcid_16x16.png" ) );
 
 			my $orcid_span = $session->make_element( "span", "class" => "orcid-tooltip" );
-	
+
 			$orcid_span->appendChild( $session->make_text( "ORCID: " ) );
 			$orcid_span->appendChild( $session->make_text( "https://orcid.org/$1" ) );
-			$orcid_link->appendChild( $orcid_span );			 
+			$orcid_link->appendChild( $orcid_span );
 
 			$person_span->appendChild( $session->make_text( " " ) );
 			$person_span->appendChild( $orcid_link );