diff options
| author | Karl Berry <karl@freefriends.org> | 2010-12-05 00:27:33 +0000 |
|---|---|---|
| committer | Karl Berry <karl@freefriends.org> | 2010-12-05 00:27:33 +0000 |
| commit | e054f60976b3466a0c1477f4dc7179c71ddfa929 (patch) | |
| tree | 30a2fdb9beeb50239a6a32edd187f119aa997582 /Master | |
| parent | 21508a9cc7d564667a929fe9f8d4ae84001e34e5 (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')
| -rw-r--r-- | Master/tlpkg/TeXLive/TeXCatalogue.pm | 3 |
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'); |