Numeric keypad remapping doesn't work (czech.el)

[Vaclav Stepan]

This bug report will be sent to the Free Software Foundation,
 not to your local site managers!!
Please write in English, because the Emacs maintainers do not have
translators to read other languages for them.

In GNU Emacs 20.7.1 (i386-redhat-linux-gnu)
 of Tue Jun 13 2000 on porky.devel.redhat.com
configured using `configure  --mandir=/usr/man --infodir=/usr/info 
--prefix=/usr --libexecdir=/usr/lib --sharedstatedir=/var --with-gcc --with-pop 
--with-x=no i386-redhat-linux-gnu'

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

Symptoms:
========
Further mentioned emacs-cs-utils contain a script which remaps the keyboard
to suit the needs of Czech speaking people. It remaps 1234567890 et al
to =f9=ec=b9=e8=f8=be=fd=e1=ed=e9, correctly (I hope) distinguishing
main and numeric keypad. In X-Windows it works as expected (ok):

Main: =f9=ec=b9=e8=f8=be=fd=e1=ed=e9
Numeric: 1234567980

But on the console:
Main: =f9=ec=b9=e8=f8=be=fd=e1=ed=e9
Numeric: =f9=ec=b9=e8=f8=be=fd=e1=ed=e9

Thanks for response.


Configuration and system:
=========================

RedHat 6.2, Emacs in RPM packages from the core RH distribution,

national support for Czech keyboard from Milan Zamazal (pdm@freesoft.cz) ---
emacs-cs-utils-4.3-1 available as
ftp://ftp.linux.cz/pub/linux/redhat-cz/6.2/i386/RedHat/RPMS/emacs-cs-utils-4.3-1.noarch.rpm

Contents of my .emacs:
======================

;;; .emacs - Sample .emacs for Red Hat Linux CZ 6.2

;; Copyright (C) 2000 Pavel Jan=edk ml.

;; Author: Pavel Jan=edk ml. <Pavel.Janik@linux.cz>
;; Maintainer: Pavel Jan=edk ml. <Pavel.Janik@linux.cz>
;; Version: 1.1
;; Keywords: emacs configuration czech

;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;;
;; This program is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;; GNU General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with this program; if not, write to the Free Software
;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

;;
;; CREDITS: Ing. Rudolf Ul=e8
;;          V=e1clav =a9t=ecp=e1n
;;          RNDr. Petr Sojka
;;

;;
;; ChangeLog:
;;
;; 13. b=f8ezna: - p=f8id=e1no nastaven=ed AuCTeXu
;;

;;
;; Nastaven=ed =e8esk=e9ho prost=f8ed=ed
;;

(load "emacs-cs-utils-init")
(setq default-input-method "czech-prog-2")

;;
;; Podpora pro tisk multilingu=e1ln=edch dokument=f9 (v=e8etn=ec =e8esk=fdch)
;;

(load "intlfonts-init")

;; Blbinky

;(load "emvaders-init")
(load "blackbook-init")
(load "htmlize-init")
(load "mailcrypt-init")
(load "footnotes-init")
(load "re-builder-init")
(load "w3-init")

;;
;; Nastaven=ed =e8esk=e9ho slovn=edku pro kontrolu pravopisu
;;

(setq ispell-dictionary "czech")

;;
;; Nastaven=ed pro AuCTeX
;;

(setq TeX-command-list
      '(("TeX" "csplain %t" TeX-run-interactive nil t)
        ("LaTeX" "cslatex '\\nonstopmode\\input{%t}'" TeX-run-LaTeX nil t)
        ("View" "%v " TeX-run-silent t nil)
        ("Print" "%p " TeX-run-command t nil)
        ("Queue" "%q" TeX-run-background nil nil)
        ("File" "dvips %d -o %f " TeX-run-command t nil)
        ("BibTeX" "bibtex %s" TeX-run-BibTeX nil nil)
        ("Index" "csindex -z il2 %s" TeX-run-command nil t)
        ("Check" "lacheck %s" TeX-run-compile nil t)
        ("Spell" "<ignored>" TeX-run-ispell-on-document nil nil)
        ("Other" "" TeX-run-command t t)
        ("Makeinfo" "makeinfo %t" TeX-run-compile nil t)
        ("AmSTeX" "amstex '\\nonstopmode\\input %t'" TeX-run-TeX nil t)
        ("pdfCSTeX" "pdfcsplain '\\nonstopmode\\input %t'" TeX-run-TeX nil t)
        ("pdfCSTeX Interactive" "pdfcsplain %t" TeX-run-interactive nil t)
        ("pdfCSLaTeX" "pdfcslatex '\\nonstopmode\\input{%t}'" TeX-run-LaTeX nil 
t)
        ("pdfCSLaTeX Interactive" "pdfcslatex %t" TeX-run-interactive nil t)
        ("View PDF" "acroread %s.pdf" TeX-run-command nil t)
        ("Generic TeX (non CS)" "tex %t" TeX-run-interactive nil t)
        ("Generic LaTeX (non CS)" "latex '\\nonstopmode\\input{%t}'" 
TeX-run-LaTeX nil t)
        ))

(load "auctex-init")

;;; .emacs ends here


Recent input:
C-\ C-\ ESC x s DEL r e p o TAB r t - - e m a c DEL 
DEL DEL DEL DEL m a c s DEL DEL DEL DEL e m a c s - 
b u g RET

Recent messages:
For information about the GNU Project and its goals, type C-h C-p.
Loading quail...
Loading quail...done
Loading quail/czech...
Loading quail/czech...done
Making completion list...
Loading view...
Loading view...done
Loading emacsbug...
Loading emacsbug...done