Remove directive text parameter to interpret_directive

diff --git a/gatekeeper.pl b/gatekeeper.pl
index e0a0928029713c55eddae1884edc8cf905712043..b66d6e220ec207676dceb0c30f5ad606b67b0c1d 100755 (executable)
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -1909,7 +1909,6 @@ The values in the returned structure are untainted.
 # As temporary scaffolding, also sets the %info quasi-global.
 sub interpret_directive {
   my $directive = shift;               # presumed tainted
-  my $directive_file_contents = shift; # temporary scaffold
 
   my @errors;
   my @trace;
@@ -2722,7 +2721,7 @@ foreach my $packet (@packets) {   # each list element is an array reference
     # this function just updates $info{email}
     guess_email_address_from_signature($directive_text);
 
-    $oplist = interpret_directive($directive, $directive_text);
+    $oplist = interpret_directive($directive);
     $op_header = $oplist->[0][1];
 
     # Phone home. E-mail the contents of the directive file to the maintainer,