From: Zack Weinberg <zack@owlfolio.org>
Date: Tue, 3 Feb 2026 17:31:55 +0000 (-0500)
Subject: fetch.pl: get GNU standards documents from gnulib
X-Git-Tag: v2.72.90~3
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=85fc27c8c4a8b7127634f9fa147685b88baf5995;p=thirdparty%2Fautoconf.git

fetch.pl: get GNU standards documents from gnulib

Pulling these files from gnulib, instead of getting them directly
from their official home, means that all the files fetched by fetch.pl
come from Savannah Git repositories, which is particularly important
right now as Savannah CVS repositories are currently inaccessible via
the web, see
https://lists.gnu.org/archive/html/savannah-hackers/2026-02/msg00024.html
et seq.

* fetch.pl (to_fetch): Get all gnustandards files from gnulib instead.
  (savannah_url): Remove special case for gnustandards.
---

diff --git a/build-aux/fetch.pl b/build-aux/fetch.pl
index d8a305132..8b77f2ddd 100755
--- a/build-aux/fetch.pl
+++ b/build-aux/fetch.pl
@@ -66,12 +66,10 @@ our %to_fetch = (
   'doc' => {
     gnulib => [
       'doc/gendocs_template',
-    ],
-    gnustandards => [
-      'gnustandards/fdl.texi',
-      'gnustandards/gnu-oids.texi',
-      'gnustandards/make-stds.texi',
-      'gnustandards/standards.texi',
+      'doc/fdl.texi',
+      'doc/gnu-oids.texi',
+      'doc/make-stds.texi',
+      'doc/standards.texi',
     ],
   },
   'lib/Autom4te' => {
@@ -132,22 +130,10 @@ sub savannah_url($$)
 {
   my ($repo, $filename) = @_;
 
-  $repo = urlquote ($repo);
-  $filename = urlquote ($filename);
+  my $cgit_base = 'https://git.savannah.gnu.org/cgit/';
+  my $cgit_op   = '.git/plain/';
 
-  # The GNU Coding Standards are still maintained in CVS.
-  if ($repo eq 'gnustandards')
-    {
-      my $cvsweb_base = 'https://cvs.savannah.gnu.org/viewvc/*checkout*/';
-      return $cvsweb_base . $repo . '/' . $filename;
-    }
-  else
-    {
-      my $cgit_base = 'https://git.savannah.gnu.org/cgit/';
-      my $cgit_op   = '.git/plain/';
-
-      return $cgit_base . $repo . $cgit_op . $filename;
-  }
+  return $cgit_base . urlquote($repo) . $cgit_op . urlquote($filename);
 }