dgit: parsecontrol: Support $allowsigned (nfc)

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/dgit b/dgit
index 8264f3e576a625e37cecb9c30bfe70f3596fd9a4..bdd6841951609938a1eb7196b264295442b0fb0c 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -923,10 +923,10 @@ sub parsecontrolfh ($$;$) {
 }
 
 sub parsecontrol {
 }
 
 sub parsecontrol {

-    my ($file, $desc) = @_;
+    my ($file, $desc, $allowsigned) = @_;

     my $fh = new IO::Handle;
     open $fh, '<', $file or die "$file: $!";
     my $fh = new IO::Handle;
     open $fh, '<', $file or die "$file: $!";

-    my $c = parsecontrolfh($fh,$desc);
+    my $c = parsecontrolfh($fh,$desc,$allowsigned);

     $fh->error and die $!;
     close $fh;
     return $c;
     $fh->error and die $!;
     close $fh;
     return $c;