comparison lisp/cus-start.el @ 110930:b6cf32bb07a1

Bug#7150: Distinguishing between left and right Alt keys on NextStep/OSX. * lisp/cus-start.el (all): ns-right-alternate-modifier is new. * lisp/term/ns-win.el (ns-right-alternate-modifier): New defvar. (ns-right-option-modifier): New alias for ns-right-alternate-modifier. (mac-right-option-modifier): New alias for ns-right-option-modifier. * src/nsterm.m (Qleft): Declare. (ns_right_alternate_modifier): New variable (NSRightAlternateKeyMask): New define. (EV_MODIFIERS): Parse NSRightAlternateKeyMask if ns_right_alternate_modifier isn't Qleft. (keyDown): If ns_right_alternate_modifier isn't Qleft, use it as emacs modifier for NSRightAlternateKeyMask. (syms_of_nsterm): DEFVAR_LISP ns-right-alternate-modifier.
author Jan D. <jan.h.d@swipnet.se>
date Mon, 11 Oct 2010 21:18:08 +0200
parents 1d1d5d9bd884
children 2316b868d5be 376148b31b5e
comparison
equal deleted inserted replaced
110929:7881980f59a5 110930:b6cf32bb07a1
264 ns 264 ns
265 (choice (const :tag "No modifier (work as alternate/option)" none) 265 (choice (const :tag "No modifier (work as alternate/option)" none)
266 (const control) (const meta) 266 (const control) (const meta)
267 (const alt) (const hyper) 267 (const alt) (const hyper)
268 (const super)) "23.1") 268 (const super)) "23.1")
269 (ns-right-alternate-modifier
270 ns
271 (choice (const :tag "No modifier (work as alternate/option)" none)
272 (const :tag "Use the value of ns-alternate-modifier"
273 left)
274 (const control) (const meta)
275 (const alt) (const hyper)
276 (const super)) "23.3")
269 (ns-function-modifier 277 (ns-function-modifier
270 ns 278 ns
271 (choice (const :tag "No modifier (work as function)" none) 279 (choice (const :tag "No modifier (work as function)" none)
272 (const control) (const meta) 280 (const control) (const meta)
273 (const alt) (const hyper) 281 (const alt) (const hyper)