X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=dgit;h=0775a7c1f31a7337a2c57cde033d77b72af8a734;hb=a4e8e4dbccd6fd64f7e31cf7527e9a8bd0bfe806;hp=4bd2e0534ff21e14f564f0a7eefa81f5e380fe5f;hpb=407a97d3fde83c07687df1ef2c24fbf57dc9cbe0;p=dgit.git

diff --git a/dgit b/dgit
index 4bd2e053..0775a7c1 100755
--- a/dgit
+++ b/dgit
@@ -4024,6 +4024,7 @@ sub get_source_format () {
     }
     $_ = <F>;
     F->error and confess "$!";
+    close F;
     chomp;
     return ($_, \%options);
 }