From aeaa63cf14da616358ef1f15da478491328ed873 Mon Sep 17 00:00:00 2001 From: Bill Erickson Date: Thu, 4 Aug 2011 16:46:54 -0400 Subject: [PATCH] Repaired copy private/public note vandelay bug Previously, all copy notes imported through vandelay were coming in as public copy notes. Signed-off-by: Bill Erickson Signed-off-by: Lebbeous Fogle-Weekley --- Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm | 2 +- Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm index 11ecdfc3b3..626a9a1550 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Cat/AssetCommon.pm @@ -523,7 +523,7 @@ sub create_copy_note { my $note = Fieldmapper::asset::copy_note->new; $note->owning_copy($copy->id); $note->creator($e->requestor->id); - $note->pub('t'); + $note->pub($pub ? 't' : 'f'); $note->value($value); $note->title($title); $e->create_asset_copy_note($note) or return $e->die_event; diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm index c2811d14ef..78c6f3832c 100644 --- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm +++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Vandelay.pm @@ -1543,7 +1543,7 @@ sub import_record_asset_list_impl { } $evt = OpenILS::Application::Cat::AssetCommon->create_copy_note( - $e, $copy, '', $item->priv_note, 1) if $item->priv_note; + $e, $copy, '', $item->priv_note) if $item->priv_note; if($evt) { $$report_args{evt} = $evt; -- 2.11.0