X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/b14e3e21ec6702d27257a1400681fc36ee10282f..9fc9a531a5938e870339211de6c0ecfedaa1c86b:/lisp/international/iso-transl.el diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index 49b1f6ef23..4bc0400ef2 100644 --- a/lisp/international/iso-transl.el +++ b/lisp/international/iso-transl.el @@ -1,6 +1,7 @@ ;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 -*- coding: iso-8859-1 -*- -;; Copyright (C) 1987, 1993-1999, 2001-2011 Free Software Foundation, Inc. +;; Copyright (C) 1987, 1993-1999, 2001-2013 Free Software Foundation, +;; Inc. ;; Author: Howard Gayle ;; Maintainer: FSF @@ -38,7 +39,6 @@ ;;; Code: ;;; Provide some binding for startup: -;;;###autoload (or key-translation-map (setq key-translation-map (make-sparse-keymap))) ;;;###autoload (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map) ;;;###autoload (autoload 'iso-transl-ctl-x-8-map "iso-transl" "Keymap for C-x 8 prefix." t 'keymap) @@ -283,11 +283,6 @@ sequence VECTOR. (VECTOR is normally one character long.)") ;; with a language-specific mapping by using `M-x iso-transl-set-language'. (iso-transl-define-keys iso-transl-char-map) -(define-key isearch-mode-map "\C-x" nil) -(define-key isearch-mode-map [?\C-x t] 'isearch-other-control-char) -(define-key isearch-mode-map "\C-x8" nil) - - (provide 'iso-transl) ;;; iso-transl.el ends here