fixed typo

git-svn-id: svn://svn.open-ils.org/ILS/trunk@4703 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
index bd8ccfe..4e983ab 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Cat.pm
@@ -172,7 +172,7 @@ sub biblio_record_replace_marc  {
        }
 
        # XXX Make the source the ID from config.bib_source
-       $record->source($source) if ($source);
+       $rec->source($source) if ($source);
        $rec->editor($e->requestor->id);
        $rec->edit_date('now');
        $rec->marc( entityize( $marcdoc->documentElement->toString ) );