X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/misc/blobdiff_plain/8d769cc9146d71188f2ffe9cd5a9160706614f1d..1dec4fa32a4a6c57ffb2c736c0c6b95b0519cb67:/cdb-assign

diff --git a/cdb-assign b/cdb-assign
index 5f2f44e..e3184c2 100755
--- a/cdb-assign
+++ b/cdb-assign
@@ -11,5 +11,5 @@ while (<>) {
   m'^\s*([-\w]+)\s*=\s*(.*\S|)\s*$' or die "bad assignment `$_'\n";
   $c->insert($1, $2);
 }
-$c->finish();
+$c->finish() or die "CDB_File->finish: $!\n";
 exit 0;