Mercurial > emacs
comparison lisp/simple.el @ 109379:863ed9bd7c0e
term/ns-win.el: Bind M-~ to 'ns-prev-frame (due to Matthew Dempsky; bug#5084). Remove incorrect binding for S-tab. (ns-alternatives-map): Change S-tab binding to backtab (bug#6616). * simple.el (normal-erase-is-backspace-setup-frame): Set mode on under ns.
author | Adrian Robert <Adrian.B.Robert@gmail.com> |
---|---|
date | Tue, 13 Jul 2010 13:41:49 +0300 |
parents | d8144fe7f3f8 |
children | c9970d4bfd62 |
comparison
equal
deleted
inserted
replaced
109376:409ecfd9731e | 109379:863ed9bd7c0e |
---|---|
6520 (unless (terminal-parameter nil 'normal-erase-is-backspace) | 6520 (unless (terminal-parameter nil 'normal-erase-is-backspace) |
6521 (normal-erase-is-backspace-mode | 6521 (normal-erase-is-backspace-mode |
6522 (if (if (eq normal-erase-is-backspace 'maybe) | 6522 (if (if (eq normal-erase-is-backspace 'maybe) |
6523 (and (not noninteractive) | 6523 (and (not noninteractive) |
6524 (or (memq system-type '(ms-dos windows-nt)) | 6524 (or (memq system-type '(ms-dos windows-nt)) |
6525 (memq window-system '(ns)) | |
6525 (and (memq window-system '(x)) | 6526 (and (memq window-system '(x)) |
6526 (fboundp 'x-backspace-delete-keys-p) | 6527 (fboundp 'x-backspace-delete-keys-p) |
6527 (x-backspace-delete-keys-p)) | 6528 (x-backspace-delete-keys-p)) |
6528 ;; If the terminal Emacs is running on has erase char | 6529 ;; If the terminal Emacs is running on has erase char |
6529 ;; set to ^H, use the Backspace key for deleting | 6530 ;; set to ^H, use the Backspace key for deleting |