From 6e06e6eef098859da95ff56a8ee9b4c75467901a Mon Sep 17 00:00:00 2001 From: Pavel Machek Date: Thu, 11 May 2000 12:00:35 +0000 Subject: Critical files from linuxdoc1 distribution checked in. --- doc/sgml2latex | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100755 doc/sgml2latex (limited to 'doc/sgml2latex') diff --git a/doc/sgml2latex b/doc/sgml2latex new file mode 100755 index 0000000..3f7b682 --- /dev/null +++ b/doc/sgml2latex @@ -0,0 +1,44 @@ +#!/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 $LibDir $BinDir $progs); + +$prefix = "/usr"; +$LibDir = "sbase"; +$BinDir = "/usr/bin"; + +use lib "/usr/lib/sgml-tools"; +use lib "/usr/perl5"; +use lib "/usr/lib/perl5"; +$progs = { + "NSGMLS" => "/usr/bin/nsgmls", + "SGMLSASP" => "/usr/bin/sgmlsasp", + "GROFF" => "/usr/bin/groff", + "GROFFMACRO" => "-mgs" +}; + +require SGMLTools; +&SGMLTools::init; + +my @FileList = SGMLTools::process_options ($0, @ARGV); +for my $curfile (@FileList) + { + SGMLTools::process_file ($curfile); + } + +exit 0; + -- cgit v1.2.3