Bug 20811: Fix wrong usage of ModBiblio
Since commitcefa7c21e2Bug 5635: bulkmarcimport new parameters & features AddBiblio call has been replaced with ModBiblio, but the return values are different. We should not replace the value of $biblionumber with what returns this subroutine. Test plan: If you are familiar with bulkmarcimport.pl you should know what to test, I am not. Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Nick Clemens <nick@bywatersolutions.com> (cherry picked from commitd15185025a) Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> (cherry picked from commitc76d5b4b4a) Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com> (cherry picked from commit0fb5af564b) Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
967d34815c
commit
b4d9ed346e
|
|
@ -419,7 +419,7 @@ RECORD: while ( ) {
|
|||
if ($biblionumber) {
|
||||
eval{$biblioitemnumber=GetBiblioData($biblionumber)->{biblioitemnumber};};
|
||||
if ($update) {
|
||||
eval { ( $biblionumber, $biblioitemnumber ) = ModBiblio( $record, $biblionumber, GetFrameworkCode($biblionumber) ) };
|
||||
eval { ModBiblio( $record, $biblionumber, GetFrameworkCode($biblionumber) ) };
|
||||
if ($@) {
|
||||
warn "ERROR: Edit biblio $biblionumber failed: $@\n";
|
||||
printlog( { id => $id || $originalid || $biblionumber, op => "update", status => "ERROR" } ) if ($logfile);
|
||||
|
|
|
|||
Loading…
Reference in New Issue