122 |
EPrints->id( $id ); |
EPrints->id( $id ); |
123 |
print "<p>$i. <b>", EPrints->lookup( 'title' ), "</b>"; |
print "<p>$i. <b>", EPrints->lookup( 'title' ), "</b>"; |
124 |
print "| score: <em>", sprintf("%.2f",$results->{$id}), "</em> | id: $id | <a href=\"?similar=$id\">similar</a> | "; |
print "| score: <em>", sprintf("%.2f",$results->{$id}), "</em> | id: $id | <a href=\"?similar=$id\">similar</a> | "; |
125 |
my ($type,$uri) = split(/;/, EPrints->lookup( 'fileinfo', 'archive' )); |
my ($type,$uri) = EPrints->fulltext; |
126 |
print qq|<a href="$uri">$type</a>|; |
print qq|<a href="$uri">$type</a>|; |
127 |
print "</p>\n"; |
print "</p>\n"; |
128 |
print "<p>"; |
print "<p>"; |