From: epg <>
Date: Sun, 5 Sep 2004 21:01:54 +0000 (+0000)
Subject: (get_tags): Properly handle errors from metaflac.
X-Git-Url: https://diplodocus.org/git/flac-archive/commitdiff_plain/deb692c6d99f8d4bc99ccc46975f9b91ded6f596?hp=1f9496c729e649cedae547ce6e3de04b052bb5e7

(get_tags): Properly handle errors from metaflac.
---

diff --git a/flac2mp3 b/flac2mp3
index df248fa..5a92c3c 100755
--- a/flac2mp3
+++ b/flac2mp3
@@ -75,7 +75,8 @@ sub get_tags {
     my $date;
     my @titles;
 
-    open(TAGS, '-|', 'metaflac', '--export-vc-to=-', $fn);
+    open(TAGS, '-|', 'metaflac', '--export-vc-to=-', $fn)
+      or die("open(metaflac --export-vc-to=- $fn): $!");
     while (<TAGS>) {
         chomp;
 
@@ -91,7 +92,7 @@ sub get_tags {
             push(@titles, $value);
         }
     }
-    close(TAGS) or die("close($fn): $!");
+    close(TAGS) or die("close(metaflac --export-vc-to=- $fn): $?");
 
     return ($artist, $album, $date, @titles);
 }