summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TeXCatalogue.pm
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-12-05 00:27:33 +0000
committerKarl Berry <karl@freefriends.org>2010-12-05 00:27:33 +0000
commite054f60976b3466a0c1477f4dc7179c71ddfa929 (patch)
tree30a2fdb9beeb50239a6a32edd187f119aa997582 /Master/tlpkg/TeXLive/TeXCatalogue.pm
parent21508a9cc7d564667a929fe9f8d4ae84001e34e5 (diff)
(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
Diffstat (limited to 'Master/tlpkg/TeXLive/TeXCatalogue.pm')
-rw-r--r--Master/tlpkg/TeXLive/TeXCatalogue.pm3
1 files changed, 2 insertions, 1 deletions
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');