diff options
Diffstat (limited to 'Master/texmf-dist/scripts')
-rwxr-xr-x | Master/texmf-dist/scripts/jfmutil/jfmutil.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/texmf-dist/scripts/jfmutil/jfmutil.pl b/Master/texmf-dist/scripts/jfmutil/jfmutil.pl index d527eddfdbd..c1fe8ca7275 100755 --- a/Master/texmf-dist/scripts/jfmutil/jfmutil.pl +++ b/Master/texmf-dist/scripts/jfmutil/jfmutil.pl @@ -12,8 +12,8 @@ use strict; #------------------------------------------------- ZRTeXtor module package ZRTeXtor; -our $VERSION = 1.007_00; -our $mod_date = "2019/09/02"; +our $VERSION = 1.008_00; +our $mod_date = "2021/05/29"; use Encode qw(encode decode); # Here follows excerpt from ZRTeXtor.pm @@ -1373,7 +1373,7 @@ sub vf_parse pl_set_value($pe->[7], 1, $fs[4]); pl_set_value($pe, 1, unpack_num($fs[1])); if ($fs[5] eq '') { splice(@$pe, 3, 1); } - $stg = 1; push(@$pl, $pe); + $stg = 2; push(@$pl, $pe); } elsif ($stg == 2 && $t == 248) { # post (($u = substr($dat, $pos, $t)) =~ /^\xf8+$/) or return vf_synerror("in postamble"); @@ -2781,8 +2781,8 @@ package main; #================================================= BEGIN use Encode qw(encode decode); my $prog_name = 'jfmutil'; -my $version = '1.3.1'; -my $mod_date = '2020/05/04'; +my $version = '1.3.2'; +my $mod_date = '2021/05/29'; #use Data::Dump 'dump'; # my ($sw_hex, $sw_uptool, $sw_noencout, $inenc, $exenc, $sw_lenient); |