From: Ian Jackson Date: Mon, 23 Jan 2012 02:32:16 +0000 (+0000) Subject: Merge branch 'master' of ../ypp-sc-tools.pctb-dict X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=37ff83644f8aa00c081cb01cdaa38b9805298470;hp=d4025d3e358f2e8327de882e6ca8ac31c5180327;p=ypp-sc-tools.git Merge branch 'master' of ../ypp-sc-tools.pctb-dict --- diff --git a/yarrg/Commods.pm b/yarrg/Commods.pm index f3ae56f..4267034 100644 --- a/yarrg/Commods.pm +++ b/yarrg/Commods.pm @@ -425,6 +425,7 @@ sub check_tsv_line ($$) { $l !~ m/\P{IsPrint}/ or &$bad_data('nonprinting char(s)'); my @v= split /\t/, $l, -1; @v==6 or &$bad_data('wrong number of fields'); + $v[1] =~ s/^\s+//; $v[1] =~ s/\s+$//; # ooo don't check :-( my ($commod,$stall) = @v; !keys %commods or