From f76faf6f02227375ea85ab70f0b9a54d12ec0804 Mon Sep 17 00:00:00 2001
From: arensb <arensb>
Date: Wed, 9 Oct 2002 14:28:51 +0000
Subject: [PATCH] (bug fix?) What looks like possibly a line left over from
 debugging was giving me an empty branch list, so transfers didn't work.

---
 circ/branchtransfers.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/circ/branchtransfers.pl b/circ/branchtransfers.pl
index 691cd9453e..d2f0e982d8 100755
--- a/circ/branchtransfers.pl
+++ b/circ/branchtransfers.pl
@@ -64,7 +64,10 @@ my $frbranchcd='';
 # set up the branchselect options....
 my $tobranchoptions;
 foreach my $br (keys %$branches) {
-    (next) unless $branches->{$br}->{'CU'};
+# FIXME - Dunno what this line was supposed to do, but "CU" never
+# appears anywhere else, so this was preventing this code from
+# working, by creating an empty <select> block later on.
+#    (next) unless $branches->{$br}->{'CU'};
     my $selected='';
     ($selected='selected') if ($br eq $tobranchcd);
     $tobranchoptions.="<option value=$br $selected>$branches->{$br}->{'branchname'}\n";
-- 
2.39.2