From d4ccf67231b05b179f72ebee268e9a8913341c9c Mon Sep 17 00:00:00 2001
From: Liz Rea <lrea@nekls.org>
Date: Wed, 8 Dec 2010 15:15:10 -0500
Subject: [PATCH] Bug 4935: fix for allowing authorized values to be "unset"

Signed-off-by: Ian Walls <ian.walls@bywatersolutions.com>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
(cherry picked from commit 61957d07ce718ff3a24bf507828f7d313522f9c3)

Signed-off-by: Chris Nighswonger <chris.nighswonger@gmail.com>
---
 tools/batchMod.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/batchMod.pl b/tools/batchMod.pl
index b2007bcc2a..6a702dceee 100755
--- a/tools/batchMod.pl
+++ b/tools/batchMod.pl
@@ -497,7 +497,7 @@ sub UpdateMarcWith {
 	my @fields_to=$marcto->field($itemtag);
     foreach my $subfield ($fieldfrom->subfields()){
 		foreach my $field_to_update (@fields_to){
-				$field_to_update->update($$subfield[0]=>$$subfield[1]) if ($$subfield[1]);
+				$field_to_update->update($$subfield[0]=>$$subfield[1]) if ($$subfield[1] != '' or $$subfield[1] == '0');
 		}
     }
   #warn "TO edited:",$marcto->as_formatted;
-- 
2.39.5