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