do not record emtpy tcn valuesOpen-ILS/src/perlmods/OpenILS/Application/Cat.pm
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 7 May 2008 18:17:37 +0000 (18:17 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 7 May 2008 18:17:37 +0000 (18:17 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@9520 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Cat.pm

index d3eeb1f..5f3b497 100644 (file)
@@ -292,7 +292,7 @@ sub biblio_record_xml_import {
 
        $record->source(bib_source_from_name($source)) if $source;
        $record->tcn_source($tcn_source);
-       $record->tcn_value($tcn);
+       $record->tcn_value($tcn) if ($tcn);
        $record->creator($e->requestor->id);
        $record->editor($e->requestor->id);
        $record->create_date('now');