From e054f60976b3466a0c1477f4dc7179c71ddfa929 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sun, 5 Dec 2010 00:27:33 +0000 Subject: (initialize): unicode the version number too; xepersian now contains a Unicode beta. git-svn-id: svn://tug.org/texlive/trunk@20659 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TeXCatalogue.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'Master') diff --git a/Master/tlpkg/TeXLive/TeXCatalogue.pm b/Master/tlpkg/TeXLive/TeXCatalogue.pm index dda2180ad8a..95ba60442a1 100644 --- a/Master/tlpkg/TeXLive/TeXCatalogue.pm +++ b/Master/tlpkg/TeXLive/TeXCatalogue.pm @@ -65,7 +65,8 @@ sub initialize { $self->{'caption'} = beautify($parser->findvalue("/entry/caption")); $self->{'description'} = beautify($parser->findvalue("/entry/description")); $self->{'license'} = $parser->findvalue('/entry/license/@type'); - $self->{'version'} = $parser->findvalue('/entry/version/@number'); + $self->{'version'} = Text::Unidecode::unidecode( + $parser->findvalue('/entry/version/@number')); $self->{'ctan'} = $parser->findvalue('/entry/ctan/@path'); if ($parser->findvalue('/entry/texlive/@location') ne "") { $self->{'texlive'} = $parser->findvalue('/entry/texlive/@location'); -- cgit v1.2.3