From c6965ddb68510874119aa444a21f9b08946283d0 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Sat, 8 Nov 1997 03:08:10 +0000
Subject: [PATCH] (ccl-encode-koi8-font): Fix bug of CCL program.
 (ccl-encode-alternativnyj-font): Likewise.

---
 lisp/language/cyrillic.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/language/cyrillic.el b/lisp/language/cyrillic.el
index 95a5efe5e0a..cad3a53f8e9 100644
--- a/lisp/language/cyrillic.el
+++ b/lisp/language/cyrillic.el
@@ -121,7 +121,7 @@
 
 (define-ccl-program ccl-encode-koi8-font
   '(0
-    ((r1 -= 160)
+    ((r1 -= 32)
      (r1 = r1
 	 [ 32 179  32  32  32  32  32  32  32  32  32  32  32  32  32  32
 	      225 226 247 231 228 229 246 250 233 234 235 236 237 238 239 240
@@ -199,7 +199,7 @@
 
 (define-ccl-program ccl-encode-alternativnyj-font
   '(0
-    ((r1 -= 160)
+    ((r1 -= 32)
      (r1 = r1
 	 [ 32 240  32  32  32  32  32  32  32  32  32  32  32  32  32  32
 	      128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143
-- 
2.39.2