chiark / gitweb /
dgit-repos-policy-debian: Break out statpackage (nfc)
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 2 May 2015 16:02:43 +0000 (17:02 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 31 May 2015 10:54:07 +0000 (11:54 +0100)
infra/dgit-repos-policy-debian

index 83ce793929469f837c277ad68d6fa30a51622e7f..cdfa80e702f9efdf66a84aca3b38c56cb8449950 100755 (executable)
@@ -120,12 +120,8 @@ sub good_suite_has_vsn_in_our_history () {
     return 0;
 }
 
-sub getpackage () {
-    die unless @ARGV >= 1;
-    $pkg = shift @ARGV;
-    die unless $pkg =~ m/^$package_re$/;
-
-    $pkgdir = "$repos/$pkg";
+sub statpackage () {
+    $pkgdir = "$repos/$pkg.git";
     if (!stat_exists $pkgdir) {
        $pkg_exists = 0;
     } else {
@@ -134,6 +130,14 @@ sub getpackage () {
     }
 }
 
+sub getpackage () {
+    die unless @ARGV >= 1;
+    $pkg = shift @ARGV;
+    die unless $pkg =~ m/^$package_re$/;
+
+    statpackage();
+}
+
 sub add_taint ($$) {
     my ($refobj, $reason);