version 1.224, 2004/05/07 18:50:14
|
version 1.225, 2004/05/09 22:55:17
|
Line 1490 sub parse_basic_search {
|
Line 1490 sub parse_basic_search {
|
('title', 'author', 'subject', 'notes', 'abstract', |
('title', 'author', 'subject', 'notes', 'abstract', |
'keywords')); |
'keywords')); |
foreach my $search (&process_phrase_input($search_string)){ |
foreach my $search (&process_phrase_input($search_string)){ |
$pretty_search_string .= '<br />'.'<b>'.$search.'</b>'; |
|
if ($ENV{'form.related'}) { |
if ($ENV{'form.related'}) { |
|
$pretty_search_string .= ' and <br />' if ($pretty_search_string ne ''); |
|
$pretty_search_string .= '<b>'.$search.'</b>'; |
my @New_Words; |
my @New_Words; |
($search,@New_Words) = &related_version($search); |
($search,@New_Words) = &related_version($search); |
next if (! $search); |
next if (! $search); |
Line 1499 sub parse_basic_search {
|
Line 1500 sub parse_basic_search {
|
$pretty_search_string .= |
$pretty_search_string .= |
" with related words: <b>@New_Words</b>"; |
" with related words: <b>@New_Words</b>"; |
} |
} |
|
} else { |
|
$pretty_search_string .= ' and ' if ($pretty_search_string ne ''); |
|
$pretty_search_string .= '<b>'.$search.'</b>'; |
} |
} |
# |
# |
# Build SQL query string based on form page |
# Build SQL query string based on form page |
Line 1511 sub parse_basic_search {
|
Line 1515 sub parse_basic_search {
|
$pretty_search_string .= ' '.$pretty_domains_string; |
$pretty_search_string .= ' '.$pretty_domains_string; |
} |
} |
$pretty_search_string .= "<br />\n"; |
$pretty_search_string .= "<br />\n"; |
$pretty_search_string =~ s:^<br />::; |
$pretty_search_string =~ s:^<br /> and ::; |
# &Apache::lonnet::logthis($final_query); |
# &Apache::lonnet::logthis($final_query); |
return ($final_query,$pretty_search_string, |
return ($final_query,$pretty_search_string, |
$libraries_to_query); |
$libraries_to_query); |
Line 2933 sub detailed_citation_view {
|
Line 2937 sub detailed_citation_view {
|
{ name=>'copyrighttag', |
{ name=>'copyrighttag', |
translate => '<b>Copyright/Distribution:</b> [_1]',}, |
translate => '<b>Copyright/Distribution:</b> [_1]',}, |
{ name=>'count', |
{ name=>'count', |
|
format => "%d", |
translate => '<b>Access Count:</b> [_1]',}, |
translate => '<b>Access Count:</b> [_1]',}, |
{ name=>'stdno', |
{ name=>'stdno', |
|
format => "%d", |
translate => '<b>Number of Students:</b> [_1]',}, |
translate => '<b>Number of Students:</b> [_1]',}, |
{ name=>'avetries', |
{ name=>'avetries', |
|
format => "%.2f", |
translate => '<b>Average Tries:</b> [_1]',}, |
translate => '<b>Average Tries:</b> [_1]',}, |
{ name=>'disc', |
{ name=>'disc', |
|
format => "%.2f", |
translate => '<b>Degree of Discrimination:</b> [_1]',}, |
translate => '<b>Degree of Discrimination:</b> [_1]',}, |
{ name=>'difficulty', |
{ name=>'difficulty', |
|
format => "%.2f", |
translate => '<b>Degree of Difficulty:</b> [_1]',}, |
translate => '<b>Degree of Difficulty:</b> [_1]',}, |
{ name=>'clear', |
{ name=>'clear', |
|
format => "%.2f", |
translate => '<b>Clear:</b> [_1]',}, |
translate => '<b>Clear:</b> [_1]',}, |
{ name=>'depth', |
{ name=>'depth', |
|
format => "%.2f", |
translate => '<b>Depth:</b> [_1]',}, |
translate => '<b>Depth:</b> [_1]',}, |
{ name=>'helpful', |
{ name=>'helpful', |
|
format => "%.2f", |
translate => '<b>Helpful:</b> [_1]',}, |
translate => '<b>Helpful:</b> [_1]',}, |
{ name=>'correct', |
{ name=>'correct', |
|
format => "%.2f", |
translate => '<b>Correct:</b> [_1]',}, |
translate => '<b>Correct:</b> [_1]',}, |
{ name=>'technical', |
{ name=>'technical', |
|
format => "%.2f", |
translate => '<b>Technical:</b> [_1]',}, |
translate => '<b>Technical:</b> [_1]',}, |
|
{ name=>'comefrom_list', |
|
type => 'list', |
|
translate => 'Resources that lead up to this resource in maps',}, |
|
{ name=>'goto_list', |
|
type => 'list', |
|
translate => 'Resources that follow this resource in maps',}, |
|
{ name=>'usage_list', |
|
type => 'list', |
|
translate => 'Resources using or importing resource',}, |
) { |
) { |
if (exists($values{$field->{'name'}}) && |
next if (! exists($values{$field->{'name'}}) || |
$values{$field->{'name'}} ne '') { |
$values{$field->{'name'}} eq ''); |
|
if (exists($field->{'type'}) && $field->{'type'} eq 'list') { |
|
$result .= '<b>'.&mt($field->{'translate'}).'</b><ul>'; |
|
foreach my $item (split(',',$values{$field->{'name'}})){ |
|
$result .= '<li>'. |
|
'<a target="search_preview" '. |
|
'href="/res/'.$item.'">'.$item.'</a></li>'; |
|
} |
|
$result .= '</ul>'; |
|
} elsif (exists($field->{'format'}) && $field->{'format'} ne ''){ |
|
$result.= &mt($field->{'translate'}, |
|
sprintf($field->{'format'}, |
|
$values{$field->{'name'}})).'<br />'."\n"; |
|
} else { |
if ($field->{'special'} eq 'url link') { |
if ($field->{'special'} eq 'url link') { |
$result.= |
$result.= |
&mt($field->{'translate'}, |
&mt($field->{'translate'}, |
'<a href="'.$values{'url'}.'" '. |
'<a href="'.$values{'url'}.'" '. |
'target="search_preview">'. |
'target="search_preview">'. |
$values{$field->{'name'}}. |
$values{$field->{'name'}}. |
'</a>'); |
'</a>'); |
} else { |
} else { |
$result.= &mt($field->{'translate'}, |
$result.= &mt($field->{'translate'}, |
$values{$field->{'name'}}); |
$values{$field->{'name'}}); |
} |
} |
$result .= "<br />\n"; |
$result .= "<br />\n"; |
} |
} |
} |
} |
$result .= "</p>"; |
$result .= "</p>"; |
if (exists($values{'extrashow'}) && $values{'extrashow'} ne '') { |
if (exists($values{'extrashow'}) && $values{'extrashow'} ne '') { |