From: Jacob Bachmeyer <jcb@gnu.org>
Date: Fri, 30 Jun 2023 02:04:41 +0000 (-0500)
Subject: Move target_filepair accessor to more-specialized class
X-Git-Url: https://vcs.fsf.org/?a=commitdiff_plain;h=143b9cadd218c00ca4de58dce0cbc11adb927860;p=gatekeeper.git

Move target_filepair accessor to more-specialized class
---

diff --git a/gatekeeper.pl b/gatekeeper.pl
index dd197a9..87dcb55 100755
--- a/gatekeeper.pl
+++ b/gatekeeper.pl
@@ -1699,11 +1699,6 @@ sub find_package {
   sub target_filename	{ (shift)->{oplist}->[0][1]->{filename}  }
   sub target_package	{ (shift)->{oplist}->[0][1]->{package}   }
 
-  sub target_filepair {
-    my $filename = (shift)->target_filename;
-    return $filename, $filename.'.sig';
-  }
-
   sub auth_keyrings {
     my $self = shift;
 
@@ -1751,6 +1746,11 @@ sub find_package {
 
   sub has_uploaded_file { return 1 }
 
+  sub target_filepair {
+    my $filename = (shift)->target_filename;
+    return $filename, $filename.'.sig';
+  }
+
   sub auth_check {
     my $self = shift;