From 6f0723f057094d937ba0bcae0056ce6ddc355bae Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 10 Jan 2021 10:22:40 +0000
Subject: [PATCH] media-scraper: Improve an error message

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 media-scraper | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/media-scraper b/media-scraper
index b44bc0f8..0c1c86fb 100755
--- a/media-scraper
+++ b/media-scraper
@@ -179,9 +179,10 @@ foreach my $groupname (sort keys %$groups) {
   foreach (split(/\n/, $gcfg->('files'))) {
     s/^\s+//;
     next if m/^\#/ || m/^$/;
-    m/^(\S+)\s+(\S+)/ or die;
+    m/^(\S+)\s+(\S+)/ or die "bad line in files: \`$_'";
     my $lministem = $1;
     my $rministem = $2;
+
     my $lstem = cfg_affixes $gcfg, 'item', $lministem;
     my $rstem = cfg_affixes $gcfg, 'stem', $rministem;
     my $lbase = "$basename/$lstem";
-- 
2.30.2