Mercurial > hg > xemacs-beta

comparison lisp/packages/hexl.el @ 98:0d2f883870bc r20-1b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b1
author cvs
date Mon, 13 Aug 2007 09:13:56 +0200
parents b9518feda344
children 28f395d8dc7a
comparison
equal deleted inserted replaced
97:498bf5da1c90 98:0d2f883870bc
704 (define-key hexl-mode-map "\C-b" 'hexl-backward-char) 704 (define-key hexl-mode-map "\C-b" 'hexl-backward-char)
705 (define-key hexl-mode-map "\C-d" 'undefined) 705 (define-key hexl-mode-map "\C-d" 'undefined)
706 (define-key hexl-mode-map "\C-e" 'hexl-end-of-line) 706 (define-key hexl-mode-map "\C-e" 'hexl-end-of-line)
707 (define-key hexl-mode-map "\C-f" 'hexl-forward-char) 707 (define-key hexl-mode-map "\C-f" 'hexl-forward-char)
708 708
709 (if (not (eq (key-binding (char-to-string help-char)) 'help-command)) 709 (if (not (eq (key-binding (vector help-char)) 'help-command))
710 (define-key hexl-mode-map (char-to-string help-char) 'undefined)) 710 (define-key hexl-mode-map (vector help-char) 'undefined))
711 711
712 (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command) 712 (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command)
713 (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command) 713 (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command)
714 (define-key hexl-mode-map "\C-k" 'undefined) 714 (define-key hexl-mode-map "\C-k" 'undefined)
715 (define-key hexl-mode-map "\C-m" 'hexl-self-insert-command) 715 (define-key hexl-mode-map "\C-m" 'hexl-self-insert-command)