view leim/leim-ext.el @ 56597:399c8a1fbe0b

The following changes are to utilize key-translation-map instead of minor mode map. (encoded-kbd-iso2022-non-ascii-map): Delete it. (encoded-kbd-coding, encoded-kbd-handle-8bit): Delete them. (encoded-kbd-last-key): New function. (encoded-kbd-iso2022-single-shift): New function. (encoded-kbd-iso2022-designation) (encoded-kbd-self-insert-iso2022-7bit) (encoded-kbd-self-insert-iso2022-8bit) (encoded-kbd-self-insert-sjis, encoded-kbd-self-insert-big5) (encoded-kbd-self-insert-ccl): Make them suitable for bindings in key-translation-map. (encoded-kbd-setup-keymap): Setup key-translation-map. (saved-key-translation-map): New variable. (encoded-kbd-mode): Save/restore key-translation-map. Adjusted for the change of encoded-kbd-setup-keymap.
author Kenichi Handa <handa@m17n.org>
date Tue, 03 Aug 2004 12:06:47 +0000
parents 5ad72ade5450
children 9f1b3f7445fb
line wrap: on
line source

;; leim-ext.el -- extra leim configulation	-*- coding:iso-2022-7bit; -*-

;; Copyright (C) 2004
;;   Free Software Foundation, Inc.
;; Copyright (C) 2004
;;   National Institute of Advanced Industrial Science and Technology (AIST)
;;   Registration Number H13PRO009

;; This file is part of GNU Emacs.

;; GNU Emacs 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.

;; GNU Emacs 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 GNU Emacs; see the file COPYING.  If not, write to the
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
;; Boston, MA 02111-1307, USA.

;;; Commentary:

;; Makefile in this directory appends the contents of this file (only
;; such non-empty lines that don't begin with ';') to the generated
;; file leim-list.el.

;;; Code:

(eval-after-load "quail/PY-b5"
  '(quail-defrule "ling2" ?$(0!r(B nil t))

;; arch-tag: 75cfdfc7-de85-44f9-b408-ff67d1ec664e