diff --git a/source/texk/web2c/uptexdir/ChangeLog b/source/texk/web2c/uptexdir/ChangeLog
index 712ca2c99..c0f7760e5 100644
--- a/source/texk/web2c/uptexdir/ChangeLog
+++ b/source/texk/web2c/uptexdir/ChangeLog
@@ -1,3 +1,9 @@
+2022-12-09  Hironori Kitagawa  <h_kitagawa2001@yahoo.co.jp>
+
+	* uptex-m.ch: Add kcatcode to a character which is made
+	by \char and \kchar.
+	https://github.com/texjporg/tex-jp-build/issues/103
+
 2022-12-03  TANAKA Takuji  <ttk@t-lab.opal.ne.jp>
 
 	* up{bibtex,dvitype,pltotf,tftopl}.ch, am/uptex.am:
diff --git a/source/texk/web2c/uptexdir/uptex-m.ch b/source/texk/web2c/uptexdir/uptex-m.ch
index 2f4fd0f7c..446e238fb 100644
--- a/source/texk/web2c/uptexdir/uptex-m.ch
+++ b/source/texk/web2c/uptexdir/uptex-m.ch
@@ -46,6 +46,7 @@
 % (2020-10-25) TTK  upTeX u1.27
 % (2022-01-23) TTK  upTeX u1.28
 % (2022-07-23) TTK  upTeX u1.29
+% (2022-12-09) HK   Hironori Kitagawa fixed a bug in \char, \kchar.
 
 @x upTeX: banner
   {printed when \pTeX\ starts}