fixed bug for mig-stagebibs when the output is already all in a single line

[migration-tools.git] / mig-bin / mig-stagebibs

diff --git a/mig-bin/mig-stagebibs b/mig-bin/mig-stagebibs
index fb76b0c..0c9bdfd 100755 (executable)
--- a/mig-bin/mig-stagebibs
+++ b/mig-bin/mig-stagebibs
@@ -95,7 +95,7 @@ while(my $line = <$xml>) {
        if ($line =~ /^<\/?collection/) { next; }
        chomp $line;
        $record = $record . $line;
-       if ($line =~ /^<\/record/) {
+       if ($line =~ /<\/record>$/) {
                stage_record($dbh,$record,$source); 
                $record = '';
                $i++;