From fe38c58d89a500e69baa343d7105924ce83167fb Mon Sep 17 00:00:00 2001
From: "Paul Buetow (europa)" <paul@buetow.org>
Date: Sat, 25 Jul 2015 00:16:13 +0100
Subject: politics, n.: 	A strife of interests masquerading as a contest of
 principles. 	The conduct of public affairs for private advantage. 	
 -- Ambrose Bierce

---
 sitemap.buetow.org/SITEMAP                |  0
 sitemap.buetow.org/content/home.xml       | 21 --------------------
 sitemap.buetow.org/content/sitemap.inc.pl | 33 -------------------------------
 3 files changed, 54 deletions(-)
 delete mode 100644 sitemap.buetow.org/SITEMAP
 delete mode 100644 sitemap.buetow.org/content/home.xml
 delete mode 100644 sitemap.buetow.org/content/sitemap.inc.pl

(limited to 'sitemap.buetow.org')

diff --git a/sitemap.buetow.org/SITEMAP b/sitemap.buetow.org/SITEMAP
deleted file mode 100644
index e69de29..0000000
diff --git a/sitemap.buetow.org/content/home.xml b/sitemap.buetow.org/content/home.xml
deleted file mode 100644
index a6d72ad..0000000
--- a/sitemap.buetow.org/content/home.xml
+++ /dev/null
@@ -1,21 +0,0 @@
-<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
-<content>
-  <pagetitle>Sitemap</pagetitle>
-  <textheader>All sites hosted</textheader>
-  <text>
-    <noop>Here are all sites hosted within this instance of </noop>
-    <namedlink href="https://xerl.buetow.org">Xerl</namedlink>
-    <noop>.</noop>
-  </text>
-  <important>
-    <text>
-      <strong>Important notice:</strong>
-      <noop>The host </noop>
-      <strong>.alpha.buetow.org</strong>
-      <noop>contains only development, test and PoC stuff.</noop>
-    </text>
-  </important>
-  <text>
-    <includerun>sitemap.inc.pl</includerun>
-  </text>
-</content>
diff --git a/sitemap.buetow.org/content/sitemap.inc.pl b/sitemap.buetow.org/content/sitemap.inc.pl
deleted file mode 100644
index 6b08b82..0000000
--- a/sitemap.buetow.org/content/sitemap.inc.pl
+++ /dev/null
@@ -1,33 +0,0 @@
-my $hostroot = $config->get_hostroot();
-
-sub space () { "&nbsp;" x 10 }
-sub nl () { "<br />\n" }
-
-sub list (*) {
-  my $tag = shift;
-  my @homepages = sort `find $hostroot -name $tag`;
-  my @ret = ();
-
-  for my $homepage (sort @homepages) {
-    my ($host) = $homepage =~ /.*hosts.(.*?).$tag/;
-    push @ret, "<b><a href='http://$host'>$host</a></b>", nl;
-
-    my $sitepath = "$hostroot/$host";
-
-    my @pages = sort `find $sitepath -name \*.xml`;
-    for my $page (sort @pages) {
-      my ($site) = $page =~ m#$host/content/(.*)\.xml$#;
-      $site =~ s#\.sub/#/#g;
-      $site =~ s#\d\d\.##g;
-      next if $site eq 'home';
-      my $sitelink = "http://$host?site=$site";
-      push @ret, space, "<a href='$sitelink'>$site</a>", nl;
-    }
-
-    push @ret, nl;
-  }
-
-  join '', @ret;
-}
-
-list SITEMAP;
-- 
cgit v1.2.3