From ed75aa8ca1b2eb3b698d797183823f1e789d9919 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Tue, 3 Jul 2007 06:57:18 +0000 Subject: let's start a TeXCatalogue module, currently quasi empty ;-) git-svn-id: svn://tug.org/texlive/trunk@4532 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TeXCatalogue.pm | 65 ++++++++++++++++++++++++++++++++++++ 1 file changed, 65 insertions(+) create mode 100644 Master/tlpkg/TeXLive/TeXCatalogue.pm (limited to 'Master/tlpkg/TeXLive') diff --git a/Master/tlpkg/TeXLive/TeXCatalogue.pm b/Master/tlpkg/TeXLive/TeXCatalogue.pm new file mode 100644 index 00000000000..122a4068a6f --- /dev/null +++ b/Master/tlpkg/TeXLive/TeXCatalogue.pm @@ -0,0 +1,65 @@ +# +# TeXLive::TeXCatalogue +# module for accessing the TeX Catalogue +# Copyright 2007 Norbert Preining +# +# This file is licensed under the GNU General Public Licence version 2 +# or any later version + +die "THIS MODULE IS NOT EVEN CLOSE TO BE FINISHED\n"; + +package TeXLive::TeXCatalogue; + +use XML::Parser; + +sub new { + my $class = shift; + my %params = @_; + my $self = { + location => $params{'location'}, + }; + bless $self, $class; + if (defined($self->{'location'})) { + $self->initialize(); + } + return $self; +} + +sub initialize { + my $class = shift; + die "Not done yet ...\n"; +} + + +1; + + +__END__ + +=head1 NAME + +TeXLive::TeXCatalogue - Accessing the TeX Catalogue + +=head1 SYNOPSIS + +missing + +=head1 DESCRIPTION + +The L module provides access to the data stored +in the TeX Catalogue. + +=head1 AUTHORS AND COPYRIGHT + +This module and its documentation was written by +Norbert Preining > for the TeX Live distribution and both +are licensed under the GNU General Public License Version 2 or later. + +=cut + +### Local Variables: +### perl-indent-level: 2 +### tab-width: 2 +### indent-tabs-mode: nil +### End: +# vim:set tabstop=2: # -- cgit v1.2.3