From dbdc151819c2e0d8b26d986013a4f59ba238b964 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Wed, 28 Apr 2004 11:42:43 +0000
Subject: Removed obsolete tools to convert echolot setups during 2.0beta*
 releases

---
 tools/change-thesaurus-filenames | 42 ----------------------------------------
 tools/convert-xml-to-datadumper  | 20 -------------------
 2 files changed, 62 deletions(-)
 delete mode 100755 tools/change-thesaurus-filenames
 delete mode 100755 tools/convert-xml-to-datadumper

(limited to 'tools')

diff --git a/tools/change-thesaurus-filenames b/tools/change-thesaurus-filenames
deleted file mode 100755
index 735791d..0000000
--- a/tools/change-thesaurus-filenames
+++ /dev/null
@@ -1,42 +0,0 @@
-#! /bin/sh
-
-# In 2.0beta4 files in the Thesaurus were named <id>-<type>. E.g: 25-adminkey
-# 2.0beta5 uses dots now instead of dashes: 25.adminkey
-
-# This script reads renames files in the Thesaurus
-
-# It is assumed that the largest id in use is 999
-
-set -e
-
-FILES=`ls [0-9]-conf [0-9]-key [0-9]-stats [0-9]-help [0-9]-adminkey [0-9][0-9]-conf \
-          [0-9][0-9]-key [0-9][0-9]-stats [0-9][0-9]-help [0-9][0-9]-adminkey \
-          [0-9][0-9][0-9]-key [0-9][0-9][0-9]-stats [0-9][0-9][0-9]-help [0-9][0-9][0-9]-adminkey 2>/dev/null` || true
-
-if [ -z "$FILES" -a -d "results/thesaurus/" ]; then
-	echo Changing to directory results/thesaurus/
-	cd results/thesaurus/
-	FILES=`ls [0-9]-conf [0-9]-key [0-9]-stats [0-9]-help [0-9]-adminkey [0-9][0-9]-conf \
-		  [0-9][0-9]-key [0-9][0-9]-stats [0-9][0-9]-help [0-9][0-9]-adminkey \
-		  [0-9][0-9][0-9]-key [0-9][0-9][0-9]-stats [0-9][0-9][0-9]-help [0-9][0-9][0-9]-adminkey 2>/dev/null` || true
-fi
-if [ -z "$FILES" -a -d "thesaurus/" ]; then
-	echo Changing to directory thesaurus/
-	cd results/thesaurus/
-	FILES=`ls [0-9]-conf [0-9]-key [0-9]-stats [0-9]-help [0-9]-adminkey [0-9][0-9]-conf \
-		  [0-9][0-9]-key [0-9][0-9]-stats [0-9][0-9]-help [0-9][0-9]-adminkey \
-		  [0-9][0-9][0-9]-key [0-9][0-9][0-9]-stats [0-9][0-9][0-9]-help [0-9][0-9][0-9]-adminkey 2>/dev/null` || true
-fi
-
-if [ -z "$FILES" ]; then
-	echo "Could not find any old style filenames in '.', 'results/thesaurus/', or 'thesaurus/'" >&2
-	exit 1
-fi
-
-echo "Renaming files..."
-for file in $FILES ; do
-	mv $file `echo $file | tr '-' '.'`
-done
-
-echo "done."
-echo "The next buildthesaurus run (per default every hour) will fix the index file"
diff --git a/tools/convert-xml-to-datadumper b/tools/convert-xml-to-datadumper
deleted file mode 100755
index 003d383..0000000
--- a/tools/convert-xml-to-datadumper
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/perl -w
-
-# In 2.0beta1 XML was used to store all relevant data
-# 2.0beta2 ditched XML and went for Data::Dumper
-
-# This script takes the XML data from STDIN and
-# prints the data in Data::Dumper perl style to stdout
-
-use strict;
-use XML::Parser;
-use XML::Dumper;
-use Data::Dumper;
-
-
-my $parser = new XML::Parser(Style => 'Tree');
-my $tree = $parser->parse( join ('', <stdin>) );
-my $dump = new XML::Dumper;
-my $CONFIG = $dump->xml2pl($tree);
-
-print Data::Dumper->Dump([ $CONFIG ], [ $ARGV[0] ]);
-- 
cgit v1.2.3