ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/obsolete/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/obsolete/pc-mode.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
#@352 Set up certain key bindings for PC compatibility.
The keys affected are:
Delete (and its variants) delete forward instead of backward.
C-Backspace kills backward a word (as C-Delete normally would).
M-Backspace does undo.
Home and End move to beginning and end of line
C-Home and C-End move to beginning and end of buffer.
C-Escape does list-buffers.
(defalias 'pc-bindings-mode #[nil "\301\302\303#\210\301\304\305#\210\301\306\307#\210\310\311\312\"\210\310\313\314\"\210\310\315\316\"\210\310\317\320\"\210\310\321\322\"\210\310\323\324\"\210\310\325\326\"\210\310\327\330\"\207" [function-key-map define-key [delete] "" [M-delete] [134217828] [C-delete] [134217828] global-set-key [C-M-delete] kill-sexp [C-backspace] backward-kill-word [M-backspace] undo [C-escape] list-buffers [home] beginning-of-line [end] end-of-line [C-home] beginning-of-buffer [C-end] end-of-buffer] 4 (#$ . 411) nil])
(provide 'pc-mode)
Kontol Shell Bypass