Rename slurp_directive_file to slurp_clearsigned_message

diff --git a/gatekeeper.pl b/gatekeeper.pl
index 89a95c8e5a815a4996327fe56f4a4e7d1d2ba5ad..ddd50a1c3505ce8a9e28d9f4d78e07bf92cccb3d 100755 (executable)
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -902,7 +902,7 @@ sub read_directive_from_string {
   return $records;
 }
 
-=item $text = slurp_directive_file ( $filename )
+=item $text = slurp_clearsigned_message ( $filename )
 
 Read the first PGP-clearsigned message from the file FILENAME and return
 it, complete with all headers and the full signature block.
@@ -911,7 +911,7 @@ The returned string is tainted.
 
 =cut
 
-sub slurp_directive_file {
+sub slurp_clearsigned_message {
   my $filename = shift;
 
   local *_;
@@ -1817,7 +1817,7 @@ sub read_directive_file {
   die "uploaded file name does not match stem"
     unless $directive_only || $uploaded_file eq $stem;
 
-  my $directive_file_contents = slurp_directive_file($directive_file);
+  my $directive_file_contents = slurp_clearsigned_message($directive_file);
   my $directive = read_directive_from_string($directive_file_contents);
 
   if ($directive_file_contents eq '') {