Update of /cvsroot/fink/pdb In directory sc8-pr-cvs17.sourceforge.net:/tmp/cvs-serv27992
Modified Files: create-finkdb.pl Log Message: don't commit until each section is done Index: create-finkdb.pl =================================================================== RCS file: /cvsroot/fink/pdb/create-finkdb.pl,v retrieving revision 1.16 retrieving revision 1.17 diff -u -d -r1.16 -r1.17 --- create-finkdb.pl 3 Dec 2007 19:22:17 -0000 1.16 +++ create-finkdb.pl 3 Dec 2007 19:31:40 -0000 1.17 @@ -468,6 +468,7 @@ }, $xmlpath, ); + commit_solr(); } sub remove_obsolete_entries @@ -506,6 +507,7 @@ }, $xmlpath, ); + commit_solr(); # second pass; in theory this should never be an issue, but it's possible # to have stale stuff in the index if it gets out-of-sync @@ -521,6 +523,7 @@ post_to_solr('<delete><query>+doc_id:"' . $package->{'doc_id'} . '"</query></delete>'); } } + commit_solr(); } # get the name of a CVS tag given the version @@ -656,14 +659,11 @@ { die "failed to post update: " . $response->status_line() . "\ncontent was:\n" . $req->content; } +} - # commit the data - $req->content('<commit />'); - $response = $ua->request($req); - if ($response->is_error()) - { - die "failed to commit update: " . $response->status_line(); - } +sub commit_solr +{ + post_to_solr('<commit/>'); } sub get_packages_from_solr ------------------------------------------------------------------------- SF.Net email is sponsored by: The Future of Linux Business White Paper from Novell. From the desktop to the data center, Linux is going mainstream. Let it simplify your IT future. http://altfarm.mediaplex.com/ad/ck/8857-50307-18918-4 _______________________________________________ Fink-commits mailing list Fink-commits@lists.sourceforge.net http://news.gmane.org/gmane.os.apple.fink.cvs