master-info sanitiser. master-info is now renamed source-info

[ypp-sc-tools.db-live.git] / yarrg / CommodsWeb.pm

diff --git a/yarrg/CommodsWeb.pm b/yarrg/CommodsWeb.pm
index 3ad8590fa9313cab26b1b7e225d745a146193e94..198185d32df4f1855fd4ca691d809b482f91bf04 100644 (file)
--- a/yarrg/CommodsWeb.pm
+++ b/yarrg/CommodsWeb.pm
@@ -91,7 +91,7 @@ my @ocean_list;
 sub ocean_list () {
     my $datadir= datadir();
     if (!@ocean_list) {
-       my $fn= "$datadir/master-info.txt";
+       my $fn= "$datadir/source-info.txt";
        my $f= new IO::File $fn or die "$fn $!";
        my @r;
        while (<$f>) {