summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/scripts/glossaries/glossaries.perl
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2014-11-24 23:04:03 +0000
committerKarl Berry <karl@freefriends.org>2014-11-24 23:04:03 +0000
commitf8afa087413b6c1c7901b309057f715e8f6dc12a (patch)
tree7774fcf0fe11e151874b45bcc01ab171dad4b44f /Master/texmf-dist/scripts/glossaries/glossaries.perl
parent226ee7542cb7aebf33c102943c20102bca7e9db3 (diff)
glossaries (24nov14)
git-svn-id: svn://tug.org/texlive/trunk@35657 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/scripts/glossaries/glossaries.perl')
-rw-r--r--Master/texmf-dist/scripts/glossaries/glossaries.perl13
1 files changed, 7 insertions, 6 deletions
diff --git a/Master/texmf-dist/scripts/glossaries/glossaries.perl b/Master/texmf-dist/scripts/glossaries/glossaries.perl
index ba6fdd5c5a8..9065e966cf1 100644
--- a/Master/texmf-dist/scripts/glossaries/glossaries.perl
+++ b/Master/texmf-dist/scripts/glossaries/glossaries.perl
@@ -1,8 +1,8 @@
# File : glossaries.perl
# Author : Nicola L.C. Talbot
# Date : 14th June 2007
-# Last Modified : 2012-09-21
-# Version : 1.05
+# Last Modified : 2014-09-24
+# Version : 1.06
# Description : LaTeX2HTML (limited!) implementation of glossaries
# package. Note that not all the glossaries.sty
# macros have been implemented.
@@ -251,7 +251,8 @@ sub gls_compare{
local($x0) = '';
local($y0) = '';
- if ($x=~s/^(&#(?:\d+|x[\da-f]+);)//)
+ #v1.06 added /i for case-insensitive match
+ if ($x=~s/^(&#(?:\d+|x[\da-f]+);)//i)
{
$x0 = $1;
}
@@ -260,7 +261,7 @@ sub gls_compare{
$x0 = $1;
}
- if ($y=~s/^(&#(?:\d+|x[\da-f]+);)//)
+ if ($y=~s/^(&#(?:\d+|x[\da-f]+);)//i)
{
$y0 = $1;
}
@@ -271,7 +272,7 @@ sub gls_compare{
local($numx);
- if ($x0=~/&#(\d+|x[\da-f]+);/)
+ if ($x0=~/&#(\d+|x[\da-f]+);/i)
{
$numx = $1;
@@ -284,7 +285,7 @@ sub gls_compare{
local($numy);
- if ($y0=~/&#(\d+|x[\da-f]+);/)
+ if ($y0=~/&#(\d+|x[\da-f]+);/i)
{
$numy = $1;