X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?a=blobdiff_plain;f=yarrg%2Fupdate-master-info;h=797eb9da52706a1cc44bbb5a3915a955387f20df;hb=HEAD;hp=f7574555d88069356991fe261f7d675c148f3098;hpb=1457a9e8d2e5ddda2b05b658e69df1b80a07320d;p=ypp-sc-tools.web-live.git

diff --git a/yarrg/update-master-info b/yarrg/update-master-info
index f757455..797eb9d 100755
--- a/yarrg/update-master-info
+++ b/yarrg/update-master-info
@@ -52,6 +52,8 @@
 # are used without permission.  This program is not endorsed or
 # sponsored by Three Rings.
 
+BEGIN { unshift @INC, qw(.) }
+
 use strict (qw(vars));
 use DBI;
 use Commods;
@@ -95,7 +97,7 @@ sub process_some_info ($$$) {
 	    next if $h =~ m/^nocommods/;
 	}
 	next if $sfn =~ m/source-info/ && $h =~ m/^ocean\b/;
-	next if $h =~ m/^client|^vessels|^shot\b/;
+	next if $h =~ m/^client|^vessels|^shot\b|^commodclasses/;
 
 	print $df $_, "\n" or die $!;
     }