texlive[51814] Build/source/texk/web2c/ptexdir: ppltotf.ch: bug fix

[commits+hironobu at tug.org]

Revision: 51814
          http://tug.org/svn/texlive?view=revision&revision=51814
Author:   hironobu
Date:     2019-08-04 14:29:26 +0200 (Sun, 04 Aug 2019)
Log Message:
-----------
ppltotf.ch: bug fix

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ptexdir/ChangeLog
    trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch

Modified: trunk/Build/source/texk/web2c/ptexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/ChangeLog	2019-08-03 23:53:12 UTC (rev 51813)
+++ trunk/Build/source/texk/web2c/ptexdir/ChangeLog	2019-08-04 12:29:26 UTC (rev 51814)
@@ -1,3 +1,8 @@
+2019-08-04  Hironobu Yamashita  <h.y.acetaminophen at gmail.com>
+
+	* ppltotf.ch: 'This property name doesn't belong in a TYPE list'
+	was never available.
+
 2019-06-24  Hironobu Yamashita  <h.y.acetaminophen at gmail.com>
 
 	* ptex-base.ch: 'Improper alphabetic or KANJI constant' error

Modified: trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch	2019-08-03 23:53:12 UTC (rev 51813)
+++ trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch	2019-08-04 12:29:26 UTC (rev 51814)
@@ -520,7 +520,7 @@
 @ @<Read a kanji property@>=
 begin get_name;
 if cur_code=comment_code then skip_to_end_of_item
-else if (cur_code<char_wd_code)and(cur_code>char_ic_code) then
+else if (cur_code<char_wd_code)or(cur_code>char_ic_code) then
   flush_error('This property name doesn''t belong in a TYPE list')
 else  begin case cur_code of
   char_wd_code: char_wd[c]:=sort_in(width,get_fix);