Correct CDBI field name on biblio::peer_bib_copy_map

Signed-off-by: Mike Rylander <mrylander@gmail.com>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/biblio.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/biblio.pm
index 44dbd4a..24e484c 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/biblio.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/CDBI/biblio.pm
@@ -35,7 +35,7 @@ package biblio::peer_bib_copy_map;
 use base qw/biblio/;
 
 biblio::peer_bib_copy_map->table( 'biblio_peer_bib_copy_map' );
-biblio::peer_bib_copy_map->columns( Essential => qw/id peer_type peer_bib target_copy/ );
+biblio::peer_bib_copy_map->columns( Essential => qw/id peer_type peer_record target_copy/ );
 #-------------------------------------------------------------------------------
 
 #-------------------------------------------------------------------------------