Mercurial > emacs
comparison lisp/term/common-win.el @ 111809:8f6857157cb5
Restore dock New Frame and Preferences menu functions (Bug#7535).
* term/common-win.el (x-setup-function-keys): Restore ns-new-frame
and ns-show-prefs.
* term/ns-win.el (global-map): Restore ns-new-frame and ns-show-prefs
bindings.
author | Jan D. <jan.h.d@swipnet.se> |
---|---|
date | Fri, 03 Dec 2010 12:48:24 +0100 |
parents | a514b8e891c0 |
children | 417b1e4d63cd |
comparison
equal
deleted
inserted
replaced
111808:9117da225c2c | 111809:8f6857157cb5 |
---|---|
123 (cons (logior (lsh 0 16) 7) 'ns-change-font) | 123 (cons (logior (lsh 0 16) 7) 'ns-change-font) |
124 (cons (logior (lsh 0 16) 8) 'ns-open-file-line) | 124 (cons (logior (lsh 0 16) 8) 'ns-open-file-line) |
125 ;;; (cons (logior (lsh 0 16) 9) 'ns-insert-working-text) | 125 ;;; (cons (logior (lsh 0 16) 9) 'ns-insert-working-text) |
126 ;;; (cons (logior (lsh 0 16) 10) 'ns-delete-working-text) | 126 ;;; (cons (logior (lsh 0 16) 10) 'ns-delete-working-text) |
127 (cons (logior (lsh 0 16) 11) 'ns-spi-service-call) | 127 (cons (logior (lsh 0 16) 11) 'ns-spi-service-call) |
128 ;;; (cons (logior (lsh 0 16) 12) 'ns-new-frame) | 128 (cons (logior (lsh 0 16) 12) 'ns-new-frame) |
129 (cons (logior (lsh 0 16) 13) 'ns-toggle-toolbar) | 129 (cons (logior (lsh 0 16) 13) 'ns-toggle-toolbar) |
130 ;;; (cons (logior (lsh 0 16) 14) 'ns-show-prefs) | 130 (cons (logior (lsh 0 16) 14) 'ns-show-prefs) |
131 )))) | 131 )))) |
132 (set-terminal-parameter frame 'x-setup-function-keys t))) | 132 (set-terminal-parameter frame 'x-setup-function-keys t))) |
133 | 133 |
134 (defvar x-invocation-args) | 134 (defvar x-invocation-args) |
135 | 135 |