From 9969573785bccb7b48fce2e82606e7f294d69542 Mon Sep 17 00:00:00 2001 From: Steven Tamm Date: Thu, 2 Sep 2004 16:59:18 +0000 Subject: Add ASCII equivalents for some function keys. (mode-line-frame-identification): Sync with x-win.el. --- lisp/term/mac-win.el | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'lisp') diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el index e42c2151701..c0ea7a9385e 100644 --- a/lisp/term/mac-win.el +++ b/lisp/term/mac-win.el @@ -141,6 +141,9 @@ (if clipboard (decode-coding-string clipboard selection-coding-system t))))) +;; Don't show the frame name; that's redundant. +(setq-default mode-line-frame-identification " ") + (defun mac-drag-n-drop (event) "Edit the files listed in the drag-n-drop event.\n\ Switch to a buffer editing the last file dropped." @@ -262,6 +265,9 @@ ascii:-*-Monaco-*-*-*-*-12-*-*-*-*-*-mac-roman") ;; Tell read-char how to convert special chars to ASCII (put 'return 'ascii-character 13) +(put 'tab 'ascii-character ?\t) +(put 'backspace 'ascii-character 127) +(put 'escape 'ascii-character ?\e) ;; ;; Available colors -- cgit v1.2.1