X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=t%2Fdb_dependent%2FSuggestions.t;h=f285929739b92e1bb140ef25f60b56ca78fdaa41;hb=e7da536551623337aed4ac6f14a127d0f50bd265;hp=001dc245d405802370f816ebc6d616eeefe5a791;hpb=8802bbf5fe6c0b35ad4d6e00293eb102a48b92b4;p=koha_fer

diff --git a/t/db_dependent/Suggestions.t b/t/db_dependent/Suggestions.t
index 001dc245d4..f285929739 100644
--- a/t/db_dependent/Suggestions.t
+++ b/t/db_dependent/Suggestions.t
@@ -9,16 +9,20 @@ use Data::Dumper;
 
 use C4::Suggestions;
 
-use Test::More tests =>6; 
+use Test::More tests =>9;
 
 BEGIN {
     use_ok('C4::Suggestions');
 }
 
-my ($suggestionid, $suggestion, $status);
+my ($suggestionid, $suggestion, $status, $biblionumber);
+$biblionumber = 1;
 ok($suggestionid= NewSuggestion( {title=>'Petit traité de philosohpie',author=>'Hubert de Chardassé',publishercode=>'Albin Michel'} ), "NewSuggestion OK");
 ok($suggestion= GetSuggestion( $suggestionid), "GetSuggestion OK");
 ok($status= ModSuggestion( {title=>'test Modif Simple', suggestionid=>$suggestionid} ), "ModSuggestion Simple OK");
 ok($status= ModSuggestion( {STATUS=>'STALLED', suggestionid=>$suggestionid} ), "ModSuggestion Status OK");
+ok($status= ModSuggestion( {suggestionid => $suggestionid, biblionumber => $biblionumber } ), "ModSuggestion, set biblionumber OK" );
+ok($suggestion= GetSuggestionFromBiblionumber( $biblionumber ), "GetSuggestionFromBiblionumber OK");
+ok($suggestion= GetSuggestionInfoFromBiblionumber( $biblionumber ), "GetSuggestionInfoFromBiblionumber OK");
 ok(@{SearchSuggestion( {STATUS=>'STALLED'} )}>0, "SearchSuggestion Status OK");