From cfd59e9ba373c99877373e0b1dee466e67a4af04 Mon Sep 17 00:00:00 2001 From: oleonard Date: Tue, 30 Nov 2004 16:14:04 +0000 Subject: [PATCH] Adding blank to relshiploop (altrelationship) loop (Bug 657) --- members/memberentry.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/members/memberentry.pl b/members/memberentry.pl index f5ba91fdc2..0834f8164e 100755 --- a/members/memberentry.pl +++ b/members/memberentry.pl @@ -170,7 +170,7 @@ if ($delete){ -default=>$data->{'categorycode'}, -labels=>$labels); - my @relationships = ('workplace', 'relative','friend', 'neighbour'); + my @relationships = ('','workplace', 'relative','friend', 'neighbour'); my @relshipdata; while (@relationships) { my $relship = shift @relationships; -- 2.39.5