summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Build/source/texk/web2c/ptexdir/ChangeLog5
-rw-r--r--Build/source/texk/web2c/ptexdir/pdvitype.ch3
2 files changed, 7 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ChangeLog b/Build/source/texk/web2c/ptexdir/ChangeLog
index 3dbd732db7e..c2643d79113 100644
--- a/Build/source/texk/web2c/ptexdir/ChangeLog
+++ b/Build/source/texk/web2c/ptexdir/ChangeLog
@@ -1,3 +1,8 @@
+2020-10-30 Hironobu Yamashita <h.y.acetaminophen@gmail.com>
+
+ * pdvitype.ch: Strict check for DVI ID was wrong for
+ output-level <= 3; needs reconsider.
+
2020-08-29 Hironobu Yamashita <h.y.acetaminophen@gmail.com>
* pdvitype.ch: Support dtou direction. Strict check for DVI ID
diff --git a/Build/source/texk/web2c/ptexdir/pdvitype.ch b/Build/source/texk/web2c/ptexdir/pdvitype.ch
index 44dc09f2e43..864d1c41ef7 100644
--- a/Build/source/texk/web2c/ptexdir/pdvitype.ch
+++ b/Build/source/texk/web2c/ptexdir/pdvitype.ch
@@ -286,7 +286,8 @@ endif('HEX_CHAR_CODE')
@t\4@>@<Cases for commands |nop|, |bop|, \dots, |pop|@>@;
@y
dir: begin
- if not ptex_p then bad_dvi('dir command within normal dvi file');
+ if not ptex_p and (out_mode=the_works) then
+ bad_dvi('dir command within normal dvi file');
major('dir ',p:1); dd:=p; goto done;
end;
@t\4@>@<Cases for commands |nop|, |bop|, \dots, |pop|@>@;