summaryrefslogtreecommitdiff
path: root/doc/sgml2txt
diff options
context:
space:
mode:
Diffstat (limited to 'doc/sgml2txt')
-rwxr-xr-xdoc/sgml2txt53
1 files changed, 0 insertions, 53 deletions
diff --git a/doc/sgml2txt b/doc/sgml2txt
deleted file mode 100755
index 013479fe..00000000
--- a/doc/sgml2txt
+++ /dev/null
@@ -1,53 +0,0 @@
-#!/usr/bin/perl
-#
-# sgmltools.in
-#
-# $Id$
-#
-# SGML-Tools driver. Calls all other SGML-Tools components, contains
-# configuration information, etcetera.
-#
-package main;
-
-sub BEGIN
-{
- require 5.004;
-}
-use strict;
-
-use vars qw($prefix $DataDir $BinDir $progs);
-
-use FindBin;
-
-$prefix = "/usr";
-$DataDir = "$FindBin::Bin/sbase";
-$BinDir = "/usr/bin";
-
-use lib "/usr/share/linuxdoc-tools";
-use lib "/usr/perl5";
-use lib "/usr/lib/perl5";
-use lib "/usr/share/perl5";
-$progs = {
- "NSGMLS" => "/usr/bin/nsgmls",
- "SGMLSASP" => "/usr/bin/sgmlsasp",
- "GROFF" => "/usr/bin/groff",
- "GROFFMACRO" => "-ms",
- "AWK" => "/usr/share/linuxdoc-tools/awkwhich"
-};
-
-if (! -x $progs->{"NSGMLS"})
- { $progs->{"NSGMLS"} = "/usr/bin/onsgmls"; }
-
-$ENV{"SGML_CATALOG_FILES"} = "$DataDir/dtd/catalog" .
- (defined $ENV{SGML_CATALOG_FILES} ? ":$ENV{SGML_CATALOG_FILES}" : "");
-
-require "$FindBin::Bin/LinuxDocTools.pm";
-&LinuxDocTools::init;
-
-my @FileList = LinuxDocTools::process_options ("txt", @ARGV);
-for my $curfile (@FileList)
- {
- LinuxDocTools::process_file ($curfile);
- }
-
-exit 0;