[Emacs-diffs] master 68d8925 2/3: Tidy up NS keybindings

[Alan Third]

branch: master
commit 68d8925077928422cf57625b0ad4b441e233b830
Author: Alan Third <address@hidden>
Commit: Alan Third <address@hidden>

    Tidy up NS keybindings
    
    * lisp/term/ns-win.el: Remove unneeded mappings to super-shifted keys.
---
 lisp/term/ns-win.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el
index 4673af3..ca2cc72 100644
--- a/lisp/term/ns-win.el
+++ b/lisp/term/ns-win.el
@@ -125,7 +125,6 @@ The properties returned may include `top', `left', 
`height', and `width'."
 (define-key global-map [?\s-h] 'ns-do-hide-emacs)
 (define-key global-map [?\s-H] 'ns-do-hide-others)
 (define-key global-map [?\M-\s-h] 'ns-do-hide-others)
-(define-key key-translation-map [?\M-\s-\u02D9] [?\M-\s-h])
 (define-key global-map [?\s-j] 'exchange-point-and-mark)
 (define-key global-map [?\s-k] 'kill-current-buffer)
 (define-key global-map [?\s-l] 'goto-line)
@@ -144,8 +143,7 @@ The properties returned may include `top', `left', 
`height', and `width'."
 (define-key global-map [?\s-z] 'undo)
 (define-key global-map [?\s-|] 'shell-command-on-region)
 (define-key global-map [s-kp-bar] 'shell-command-on-region)
-(define-key global-map [C-s- ] 'ns-do-show-character-palette)
-(define-key key-translation-map [C-s-268632064] [C-s- ])
+(define-key global-map [?\C-\s- ] 'ns-do-show-character-palette)
 ;; (as in Terminal.app)
 (define-key global-map [s-right] 'ns-next-frame)
 (define-key global-map [s-left] 'ns-prev-frame)