diff options
Diffstat (limited to 'Master/texmf-dist/scripts')
-rw-r--r-- | Master/texmf-dist/scripts/mfirstuc/mfirstuc.l2h (renamed from Master/texmf-dist/scripts/mfirstuc/mfirstuc.perl) | 29 |
1 files changed, 24 insertions, 5 deletions
diff --git a/Master/texmf-dist/scripts/mfirstuc/mfirstuc.perl b/Master/texmf-dist/scripts/mfirstuc/mfirstuc.l2h index 7ab863d06f4..1115dfcbf13 100644 --- a/Master/texmf-dist/scripts/mfirstuc/mfirstuc.perl +++ b/Master/texmf-dist/scripts/mfirstuc/mfirstuc.l2h @@ -1,12 +1,20 @@ -# File : mfirstuc.perl +# File : mfirstuc.l2h # Author : Nicola L. C. Talbot -# Date : 2012-09-21 -# Version : 1.0 +# Version : 2.08 (2022-10-14) # Description : LaTeX2HTML (limited!) implementation of mfirstuc package # This is a LaTeX2HTML style implementing the mfirstuc package, and -# is distributed as part of the glossaries package. -# Copyright 2007 Nicola L.C. Talbot +# was distributed as part of the glossaries package, but is now +# distributed as part of the mfirstuc package. There's no guarantee +# that it still works with new versions of LaTeX2HTML. +# +# v2.08: +# - The version number has been updated +# - file extension changed from .perl to .l2h to more easily identify it as a +# LaTeX2HTML file rather than a standalone Perl script. +# - Added MFUsentencecase but it's identical to makefirstuc +# +# Copyright 2007-2022 Nicola L.C. Talbot # This work may be distributed and/or modified under the # conditions of the LaTeX Project Public License, either version 1.3 # of this license of (at your option) any later version. @@ -34,6 +42,17 @@ sub do_cmd_makefirstuc{ &translate_commands("\\glsmakefirstuc $text") . $_; } +sub do_cmd_MFUsentencecase{ + local($_) = @_; + + local($id,$text); + + $text = &missing_braces unless + s/$next_pair_pr_rx/$id=$1;$text=$2;''/eo; + + &translate_commands("\\glsmakefirstuc $text") . $_; +} + sub do_cmd_xmakefirstuc{ local($_) = @_; |