version 1.217, 2004/04/27 15:24:09
|
version 1.218, 2004/04/27 15:45:04
|
Line 1150 sub parse_advanced_search {
|
Line 1150 sub parse_advanced_search {
|
'modifyinguser','standards','mime'); |
'modifyinguser','standards','mime'); |
my @StatsFields = ('stdno','avetries','difficulty','disc'); |
my @StatsFields = ('stdno','avetries','difficulty','disc'); |
my @EvalFields = ('clear','depth','helpful','correct','technical'); |
my @EvalFields = ('clear','depth','helpful','correct','technical'); |
my @ContextFields = ('courses','dependencies'); |
|
my $fillflag=0; |
my $fillflag=0; |
my $pretty_search_string = "<br />\n"; |
my $pretty_search_string = "<br />\n"; |
# Clean up fields for safety |
# Clean up fields for safety |
Line 2783 extra custom metadata to show.
|
Line 2782 extra custom metadata to show.
|
###################################################################### |
###################################################################### |
sub detailed_citation_view { |
sub detailed_citation_view { |
my ($prefix,%values) = @_; |
my ($prefix,%values) = @_; |
my $icon=&Apache::loncommon::icon($values{'url'}); |
my $icon= |
my $result=<<END; |
my $result; |
<b>$prefix<img src="$icon" /><a href="http://$ENV{'HTTP_HOST'}$values{'url'}" |
$result .= '<b>'.$prefix. |
target='search_preview'>$values{'title'}</a></b> |
'<img src="'.&Apache::loncommon::icon($values{'url'}).' " />'. |
<p> |
'<a href="http://'.$ENV{'HTTP_HOST'}.$values{'url'}.'" '. |
<b>$values{'author'}</b>, <i>$values{'owner'}</i><br /> |
'target="search_preview">'.$values{'title'}."</a></b>\n"; |
|
$result .= "<p>\n"; |
<b>Subject: </b> $values{'subject'}<br /> |
$result .= '<b>'.$values{'author'}.'</b>,'. |
<b>Keyword(s): </b> $values{'keywords'}<br /> |
' <i>'.$values{'owner'}.'</i><br />'; |
<b>Notes: </b> $values{'notes'}<br /> |
foreach my $field |
<b>MIME Type: </b> $values{'mimetag'}<br /> |
( |
<b>Language: </b> $values{'language'}<br /> |
{ name=>'subject', |
<b>Copyright/Distribution:</b> $values{'copyrighttag'}<br /> |
translate => '<b>Subject:</b> [_1]',}, |
</p> |
{ name=>'keywords', |
$values{'extrashow'} |
translate => '<b>Keywords:</b> [_1]',}, |
<p> |
{ name=>'notes', |
$values{'shortabstract'} |
translate => '<b>Notes:</b> [_1]',}, |
</p> |
{ name=>'mimetag', |
<hr align='left' width='200' noshade /> |
translate => '<b>MIME Type:</b> [_1]',}, |
END |
{ name=>'standards', |
|
translate => '<b>Standards:</b>[_1]',}, |
|
{ name=>'copyrighttag', |
|
translate => '<b>Copyright/Distribution:</b> [_1]',}, |
|
{ name=>'stdno', |
|
translate => '<b>Number of Students:</b> [_1]',}, |
|
{ name=>'avetries', |
|
translate => '<b>Average Tries:</b> [_1]',}, |
|
{ name=>'disc', |
|
translate => '<b>Degree of Discrimination:</b> [_1]',}, |
|
{ name=>'difficulty', |
|
translate => '<b>Degree of Difficulty:</b> [_1]',}, |
|
{ name=>'clear', |
|
translate => '<b>Clear:</b> [_1]',}, |
|
{ name=>'depth', |
|
translate => '<b>Depth:</b> [_1]',}, |
|
{ name=>'helpful', |
|
translate => '<b>Helpful:</b> [_1]',}, |
|
{ name=>'correct', |
|
translate => '<b>Correcy:</b> [_1]',}, |
|
{ name=>'technical', |
|
translate => '<b>Technical:</b> [_1]',}, |
|
) { |
|
$result.= &mt($field->{'translate'},$values{$field->{'name'}}). |
|
"<br />\n"; |
|
} |
|
$result .= "</p>".$values{'extrashow'}. |
|
'<p>'.$values{'shortabstract'}.'</p>'; |
|
$result .= '<hr align="left" width="200" noshade />'."\n"; |
return $result; |
return $result; |
} |
} |
|
|