--- loncom/interface/lonsearchcat.pm 2011/07/04 09:24:58 1.330 +++ 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.330 2011/07/04 09:24:58 foxr 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; ###################################################################### @@ -3063,22 +3062,8 @@ SCRIPT SCRIPT - - # Add JavaScript-function to set link for a ressource to wishlist - $js.=< -// - -SCRIPT - my $start_page = &Apache::loncommon::start_page(undef,$js, - {'only_body' =>1}); + {'only_body' =>1,}); my $result=< @@ -3197,11 +3182,7 @@ sub detailed_citation_view { $result .= ''.$prefix. ''.' '. ''.$values{'title'}."\n". - ''. - ''; + 'target="preview">'.$values{'title'}."\n"; $result .= "

\n"; $result .= ''.$values{'author'}.','. ' '.$values{'owner'}.'
'; @@ -3332,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'}
@@ -3387,11 +3362,6 @@ sub compact_view { $result.=' '. ''. &HTML::Entities::encode($values{'title'},'<>&"').' '. - ''. - ''. - ''. $link.' '.$values{'author'}.' ('.$values{'domain'}.')'; return $result; } @@ -3433,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',