Mercurial > emacs

comparison lisp/emulation/pc-select.el @ 29807:e4668ff0692c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(pc-selection-mode): Bind `M-\d' instead of `M-backspace'.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 20 Jun 2000 18:24:35 +0000
parents a77d473867b8
children 97c0caec0a32
comparison
equal deleted inserted replaced
29806:419756e43257 29807:e4668ff0692c
1 ;;; pc-select.el --- emulate mark, cut, copy and paste from Motif 1 ;;; pc-select.el --- emulate mark, cut, copy and paste from Motif
2 ;;; (or MAC GUI or MS-windoze (bah)) look-and-feel 2 ;;; (or MAC GUI or MS-windoze (bah)) look-and-feel
3 ;;; including key bindings. 3 ;;; including key bindings.
4 4
5 ;; Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc. 5 ;; Copyright (C) 1995, 1996, 1997, 2000 Free Software Foundation, Inc.
6 6
7 ;; Author: Michael Staats <michael@thp.Uni-Duisburg.DE> 7 ;; Author: Michael Staats <michael@thp.Uni-Duisburg.DE>
8 ;; Keywords: convenience 8 ;; Keywords: convenience
9 ;; Created: 26 Sep 1995 9 ;; Created: 26 Sep 1995
10 10
741 741
742 ;; The following bindings are from Pete Forman. 742 ;; The following bindings are from Pete Forman.
743 (global-set-key [f6] 'other-window) ; KNextPane F6 743 (global-set-key [f6] 'other-window) ; KNextPane F6
744 (global-set-key [delete] 'delete-char) ; KDelete Del 744 (global-set-key [delete] 'delete-char) ; KDelete Del
745 (global-set-key [C-delete] 'kill-line) ; KEraseEndLine cDel 745 (global-set-key [C-delete] 'kill-line) ; KEraseEndLine cDel
746 (global-set-key [M-backspace] 'undo) ; KUndo aBS 746 (global-set-key "\M-\d" 'undo) ; KUndo aBS
747 747
748 ;; The following bindings are taken from pc-mode.el 748 ;; The following bindings are taken from pc-mode.el
749 ;; as suggested by RMS. 749 ;; as suggested by RMS.
750 ;; I only used the ones that are not covered above. 750 ;; I only used the ones that are not covered above.
751 (define-key function-key-map [M-delete] [?\M-d]) 751 (define-key function-key-map [M-delete] [?\M-d])