remove ports, Special Configurations and User support, see #932252

1 files changed, 0 insertions, 97 deletions

diff --git a/english/intro/organization.data b/english/intro/organization.data
index 1a28f6a4cfb..d5a0171c63f 100644
--- a/english/intro/organization.data
+++ b/english/intro/organization.data
@@ -197,42 +197,12 @@ transitional (elected or appointed with a certain expiration date).</gettext>
     <member>Josip Rodin
   <job <a name="wnpp" href="$(HOME)/devel/wnpp/"><gettext domain="organization">Work-Needing and Prospective Packages list</gettext></a>> <genericemail debian-wnpp@lists.debian.org>
     <member>Matej Vela
-  <job <a name="ports" href="$(HOME)/ports/"><gettext domain="organization">Ports</gettext> — GNU/Linux</a>>
-    <ul>
-    <job <a name="alpha" href="$(HOME)/ports/alpha/">Alpha</a>> <genericemail debian-alpha@lists.debian.org>
-      <membermail "Michael Cree" mcree@orcon.net.nz>
-      <membermail "Bob Tracy" rct@gherkin.frus.com>
-      <membermail "Bill MacAllister" whm@stanford.edu>
-    <job <a name="amd64" href="$(HOME)/ports/amd64/">AMD64</a>> <genericemail debian-amd64@lists.debian.org>
-    <job <a name="arm" href="$(HOME)/ports/arm/">ARM</a>> <genericemail debian-arm@lists.debian.org>
-    <job <a name="i386" href="$(HOME)/ports/i386/">i386</a>> <genericemail debian-devel@lists.debian.org>
-    <job <a name="ia64" href="$(HOME)/ports/ia64/">IA-64</a>> <genericemail debian-ia64@lists.debian.org>
-      <member>Dann Frazier
-    <job <a name="m68k" href="$(HOME)/ports/m68k/">m68k</a>> <genericemail debian-68k@lists.debian.org>
-    <job <a name="mips" href="$(HOME)/ports/mips/">MIPS</a>> <genericemail debian-mips@lists.debian.org>
-    <job <a name="hppa" href="$(HOME)/ports/hppa/">PA-RISC</a>> <genericemail debian-hppa@lists.debian.org>
-      <member>Carlos O'Donell
-      <member>John David Anglin
-      <member>Thibaut Varene
-    <job <a name="powerpc" href="$(HOME)/ports/powerpc/">PowerPC</a>> <genericemail debian-powerpc@lists.debian.org>
-    <job <a name="riscv" href="https://wiki.debian.org/RISC-V">RISC-V</a>> <genericemail debian-riscv@lists.debian.org>
-    <job <a name="s390" href="$(HOME)/ports/s390/">S/390</a>> <genericemail debian-s390@lists.debian.org>
-      <member>Philipp Kern
-    <job <a name="sparc" href="$(HOME)/ports/sparc/">SPARC/UltraSPARC</a>> <genericemail debian-sparc@lists.debian.org>
-    <job <a name="superh" href="https://wiki.debian.org/SH4">SuperH</a>> <genericemail debian-superh@lists.debian.org>
-  </ul>
   <job <a name="hurd" href="$(HOME)/ports/hurd/">GNU/Hurd</a>> <genericemail debian-hurd@lists.debian.org>
     <member>Samuel Thibault
     <member>Svante Signell
   <job <a name="kfreebsd" href="$(HOME)/ports/kfreebsd-gnu/">GNU/kFreeBSD</a>> <genericemail debian-bsd@lists.debian.org>
     <member>Steven Chamberlain
     <member>Christoph Egger
-  <job <a name="special"><gettext domain="organization">Special Configurations</gettext></a>>
-  <ul>
-    <job <a name="laptop"><gettext domain="organization">Laptops</gettext></a>> <genericemail debian-laptop@lists.debian.org>
-    <job <a name="firewall"><gettext domain="organization">Firewalls</gettext></a>> <genericemail debian-firewall@lists.debian.org>
-    <job <a name="embedded"><gettext domain="organization">Embedded systems</gettext></a>> <genericemail debian-embedded@lists.debian.org>
-  </ul>
 </ul>
 
 <a name="commsoutreach"></a>
@@ -347,73 +317,6 @@ or through <a href="https://www.spi-inc.org/">SPI</a>.</p>
 <h3><gettext domain="organization">Support and Infrastructure</gettext></h3>
 
 <ul>
-  <job <a name="user-support" href="$(HOME)/support"><gettext domain="organization">User support</gettext></a>>
-    <ul>
-<perl>
-	open LISTS, "<", "$(HOME)/../english/MailingLists/lists.cfg"
-		or die "Can't open lists.cfg: $!\n";
-
-	my ( %entry, %userlists );
-	while (<LISTS>) {
-		next if /^#/;
-		if (/^\s*$/) {
-			process_entry( %entry );
-			%entry = ();
-			next;
-		}
-		if (/^([^:]+):\s*(.*)$/) {
-			$entry{$1} = $2;
-		}
-	}
-	close LISTS;
-	if (keys %entry) { process_entry( %entry ); }
-
-	sub process_entry {
-		my %entry = @_;
-
-		return unless $entry{List};
-		return unless $entry{Section};
-		$entry{Language} ||= 'English';
-
-		if ($entry{List} =~ /(debian-user-(.*)\@lists.debian.org)/) {
-			$userlists{$2} = $1;
-#			warn "$2: $1\n";
-			return;
-		}
-
-		if ($entry{List} =~ /(debian-(chinese-(?:big5|gb))\@lists.debian.org)/) {
-			my ($lang,$list) = ($2,$1);
-			$lang =~ tr/-/_/;
-			$userlists{$lang} = $list;
-			#warn "$lang: $list\n";
-			return;
-		}
-
-		if (($entry{List} =~ /(debian-([^-]+)\@lists.debian.org)/)
-		    && ($entry{Section} eq 'user')
-                    && ($entry{Language} ne 'English')) {
-			$userlists{$2} = $1;
-#			warn "$2: $1\n";
-			return;
-		}
-	}
-
-	my $userlists_lang = {};
-
-	$userlists_lang{$trans{$CUR_ISO_LANG}{english}} = "debian-user\@lists.debian.org";
-	foreach my $list (keys %userlists) {
-		unless (exists($trans{$CUR_ISO_LANG}{$list}))
-		{
-			warn("Language `$list' not found in translation table'")
-		}
- 		$userlists_lang{$trans{$CUR_ISO_LANG}{$list}} = "$userlists{$list}";
-	}
-
-	foreach my $list (sort langcmp keys %userlists_lang) {
-		print "<li>$list — &lt;<a href=\"mailto:$userlists_lang{$list}\">$userlists_lang{$list}</a>&gt;</li>\n";
-	}
-</perl>
-    </ul>
   <job <a name="bugs" href="https://bugs.debian.org/"><gettext domain="organization">Bug Tracking System</gettext></a>> <genericemail owner@bugs.debian.org>
     <member>Don Armstrong
     <member>Blars Blarson