diff options
author | Norbert Preining <preining@logic.at> | 2007-10-25 05:49:35 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-10-25 05:49:35 +0000 |
commit | 51a660b8c96ca59ea8cff3d9b12ff9068deb236b (patch) | |
tree | d1247ca81975389b3c69cf7dcd20b5509946046d /Master/tlpkg/TeXLive/TeXCatalogue.pm | |
parent | 4de2d98dd659c6d463167afc985ad06abf1618dc (diff) |
remove texcatalogue-texlive, texcatalogue-miktex from the texlive.tlpdb,
reformat texcatalogue-date
fix the "wide chars" warning
git-svn-id: svn://tug.org/texlive/trunk@5277 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TeXCatalogue.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TeXCatalogue.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TeXCatalogue.pm b/Master/tlpkg/TeXLive/TeXCatalogue.pm index 4fc64058d88..f94672181ec 100644 --- a/Master/tlpkg/TeXLive/TeXCatalogue.pm +++ b/Master/tlpkg/TeXLive/TeXCatalogue.pm @@ -167,7 +167,7 @@ sub initialize { chdir($self->{'location'} . "/entries") || die ("Cannot chdir to TeX Catalogue entries: $!"); # parse all the files foreach (glob("?/*.xml")) { - open(my $io,"<$_") or die "Cannot read $_: $!"; + open(my $io,"<:utf8", "$_") or die "Cannot read $_: $!"; my $tce = TeXLive::TeXCatalogue::Entry->new( 'ioref' => $io ); close($io); $self->{'entries'}{$tce->name} = $tce; |