[Psp-checkins] CVS: psp/lib/tools/FieldSpace Propagation.pm,1.3,1.4

[James E. J. Jr. <mu...@us...>]

Update of /cvsroot/psp/psp/lib/tools/FieldSpace
In directory sc8-pr-cvs1:/tmp/cvs-serv27658/psp/lib/tools/FieldSpace

Modified Files:
	Propagation.pm 
Log Message:
do not consider empty string to be a pair.

Index: Propagation.pm
===================================================================
RCS file: /cvsroot/psp/psp/lib/tools/FieldSpace/Propagation.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- Propagation.pm	1 Nov 2002 22:59:34 -0000	1.3
+++ Propagation.pm	2 Aug 2003 06:16:49 -0000	1.4
@@ -186,6 +186,7 @@
     @pairs or @values or next;
     $group->{import_controls} = [];
     for my $pair (@pairs) {
+      length($pair) or last;
       my ($key,$value) = ($pair =~ /^([^=]+)=(.*)$/);
       push @{$group->{import_controls}}, $key => $value;
     }