--- loncom/interface/lonsearchcat.pm 2011/12/09 01:04:27 1.331 +++ loncom/interface/lonsearchcat.pm 2012/05/10 18:34:18 1.331.4.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Search Catalog # -# $Id: lonsearchcat.pm,v 1.331 2011/12/09 01:04:27 www Exp $ +# $Id: lonsearchcat.pm,v 1.331.4.1 2012/05/10 18:34:18 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -78,7 +78,6 @@ use HTML::Entities(); use Parse::RecDescent; use Apache::lonnavmaps; use Apache::lonindexer(); -use Apache::lonwishlist(); use LONCAPA; ###################################################################### @@ -3064,8 +3063,7 @@ SCRIPT SCRIPT my $start_page = &Apache::loncommon::start_page(undef,$js, - {'only_body' =>1, - 'add_wishlist' =>1}); + {'only_body' =>1,}); my $result=< @@ -3184,11 +3182,7 @@ sub detailed_citation_view { $result .= ''.$prefix. ''.' '. ''.$values{'title'}."\n". - ''. - ''; + 'target="preview">'.$values{'title'}."\n"; $result .= "

\n"; $result .= ''.$values{'author'}.','. ' '.$values{'owner'}.'
'; @@ -3319,15 +3313,9 @@ sub summary_view { $jumpurl=~s|^/ext/|http://|; my $link = '
'.&display_url($jumpurl,1).'
'; - my $titleWL = &mt('Set link to wishlist'); $result.=<$values{'title'} - - set wishlistlink -
$link
$values{'author'}, $values{'owner'} -- $values{'lastrevisiondate'}
@@ -3374,11 +3362,6 @@ sub compact_view { $result.=' '. ''. &HTML::Entities::encode($values{'title'},'<>&"').' '. - ''. - ''. - ''. $link.' '.$values{'author'}.' ('.$values{'domain'}.')'; return $result; } @@ -3420,18 +3403,12 @@ sub fielded_format_view { my $jumpurl=$values{'url'}; $jumpurl=~s|^/ext/|http://|; - my $titleWL = ('Set link to wishlist'); my $result=<

URL:
$values{'url'} - - set wishlistlink -
END foreach my $field ('title','author','domain','subject','keywords','notes',