(get_tags): Catch errors on close.

diff --git a/fa-flacd b/fa-flacd
index cbcc5c6..cc8438f 100755 (executable)
--- a/fa-flacd
+++ b/fa-flacd
@@ -63,7 +63,7 @@ sub get_tags {
             verbose("DATE $date from $fn\n");
         }
     }
-    close(TAGS);
+    close(TAGS) or die("close($fn): $!");
 
     return ($artist, $album, $date, @tags);
 }