Bind delete and backspace explicitly, like DEL.
(define-key map (char-to-string i) 'quail-self-insert-command)
(setq i (1+ i)))
(define-key map "\177" 'quail-delete-last-char)
+ (define-key map [delete] 'quail-delete-last-char)
+ (define-key map [backspace] 'quail-delete-last-char)
;;; This interferes with handling of escape sequences on non-X terminals.
;;; (define-key map "\e" '(keymap (t . quail-execute-non-quail-command)))
(let ((meta-map (make-sparse-keymap)))