summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Build/source/texk/web2c/eptexdir/ChangeLog4
-rw-r--r--Build/source/texk/web2c/eptexdir/eptex.ech4
2 files changed, 6 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/eptexdir/ChangeLog b/Build/source/texk/web2c/eptexdir/ChangeLog
index 9b38c0d0738..898c7a5a083 100644
--- a/Build/source/texk/web2c/eptexdir/ChangeLog
+++ b/Build/source/texk/web2c/eptexdir/ChangeLog
@@ -1,3 +1,7 @@
+2021-07-15 Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
+
+ * eptex.ech: Fix a warning message from \epTeXinputencoding.
+
2021-07-01 Hironori Kitagawa <h_kitagawa2001@yahoo.co.jp>
* eptex.ech: Revise \lastnodesubtype to show math "noad" types,
diff --git a/Build/source/texk/web2c/eptexdir/eptex.ech b/Build/source/texk/web2c/eptexdir/eptex.ech
index 669a70ee88c..d60a0f714f7 100644
--- a/Build/source/texk/web2c/eptexdir/eptex.ech
+++ b/Build/source/texk/web2c/eptexdir/eptex.ech
@@ -461,13 +461,13 @@ begin
begin if input_stack[k].state_field=token_list then decr(k)
else if input_stack[k].name_field>19 then
begin j:=input_stack[k].index_field; k:=-1; end
- else begin j:=-(name+1); k:=-1; end
+ else begin j:=-(input_stack[k].name_field+1); k:=-1; end
end
end
else if name>19 then j:=index else j:=-(name+1);
if (j>=0) or (j=-1) or (j=-18) then begin
k:=true;
- if j>= 0 then k:=setinfileenc(input_file[j],stringcast(name_of_file+1))
+ if j>=0 then k:=setinfileenc(input_file[j],stringcast(name_of_file+1))
else k:=setstdinenc(stringcast(name_of_file+1));
if k = false then
begin begin_diagnostic;