Mercurial > hg > xemacs-beta
comparison lisp/keydefs.el @ 1435:2b0c1a057037
[xemacs-hg @ 2003-04-28 16:18:23 by james]
Remove key mappings to the nonexistent function-key-error.
author | james |
---|---|
date | Mon, 28 Apr 2003 16:18:23 +0000 |
parents | 1b0339b048ce |
children | dd935ef485d2 |
comparison
equal
deleted
inserted
replaced
1434:41edab4a0ad4 | 1435:2b0c1a057037 |
---|---|
663 (define-key global-map 'kp-6 'self-insert-command) | 663 (define-key global-map 'kp-6 'self-insert-command) |
664 (define-key global-map 'kp-7 'self-insert-command) | 664 (define-key global-map 'kp-7 'self-insert-command) |
665 (define-key global-map 'kp-8 'self-insert-command) | 665 (define-key global-map 'kp-8 'self-insert-command) |
666 (define-key global-map 'kp-9 'self-insert-command) | 666 (define-key global-map 'kp-9 'self-insert-command) |
667 | 667 |
668 (define-key global-map 'select 'function-key-error) | 668 ;(define-key global-map 'select 'function-key-error) |
669 (define-key global-map 'print 'function-key-error) | 669 ;(define-key global-map 'print 'function-key-error) |
670 (define-key global-map 'execute 'execute-extended-command) | 670 (define-key global-map 'execute 'execute-extended-command) |
671 (define-key global-map 'clearline 'function-key-error) | 671 ;(define-key global-map 'clearline 'function-key-error) |
672 (define-key global-map 'insertline 'open-line) | 672 (define-key global-map 'insertline 'open-line) |
673 (define-key global-map 'deleteline 'kill-line) | 673 (define-key global-map 'deleteline 'kill-line) |
674 (define-key global-map 'insertchar 'function-key-error) | 674 ;(define-key global-map 'insertchar 'function-key-error) |
675 (define-key global-map 'deletechar 'delete-char) | 675 (define-key global-map 'deletechar 'delete-char) |
676 | 676 |
677 ;;; keydefs.el ends here | 677 ;;; keydefs.el ends here |