") 'duplicate-line) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ECB MODE;;;;;;;;;;;;;;;;;;;;; (...">
Geek Answers Handbook

Super key binding in emacs

(global-set-key (kbd "<sd>") 'duplicate-line) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ECB MODE;;;;;;;;;;;;;;;;;;;;; (global-set-key (kbd "<s-left>") 'ecb-goto-window-methods) (global-set-key (kbd "<s-right>") 'ecb-goto-window-edit1) (global-set-key (kbd "<s-down>") 'ecb-goto-window-history) (global-set-key (kbd "<s-up>") 'ecb-goto-window-sources) (global-set-key (kbd "<s-home>") 'ecb-goto-window-directories)

It's part of my .emacs file. I had a strange problem when binding a key combination comprising a key super . Whenever I tethering function to super-key + <alphanumberic value> , it refuses to work.
In the above file, all the bindings except <sd> , are working properly.
I use emacs 24.3 on fedora 13

+4
source share
3 answers

The reason why the macro kbd so convenient is that argument that you pass - it is the same as that of the Emacs, when you ask about the key bindings. You guessed it, but you do not ever need to.

When entering Ch k (or Ch c), and then the corresponding key sequence, Emacs displays a message that describes the binding. In this case, he will describe the super-Key + d like sd .

So you can use (kbd "sd") to refer to it.

  • Ask to describe Emacs key sequence
  • Insert the answer in the kbd
+5
source

Some sample that works here:

 (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super? \ ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super? \ Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super p)] 'View-sroll-line-backward) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super s)] 'hs-hide-all) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super tab)] 'scroll-up) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super \ {)] 'ar-brace-region-atpt) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test) super space)] 'ar-whitespace-to-minus) (global-set-key [(super ?\ö)] 'ar-beginning-of-comment-atpt) (global-set-key [(super ?\Ö)] 'ar-end-of-comment-atpt) (global-set-key [(super p)] 'View-sroll-line-backward) (global-set-key [(super s)] 'hs-hide-all) (global-set-key [(super tab)] 'scroll-up) (global-set-key [(super \{)] 'ar-brace-region-atpt) (global-set-key [(super space)] 'ar-whitespace-to-minus) (global-set-key [(super kp-4)] 'missing-py-variable-name-face-lp-1215791-test)
+1
source

All this from . . . /lisp/term/ns-win.el . . . /lisp/term/ns-win.el

 (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s-,] 'customize) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s- ']' next-multiframe-window) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s--] 'center-line) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s-:] 'ispell) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s-?] 'info) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s- ^] 'kill-some-buffers) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ s- &] 'kill-this-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sC] 'ns-popup-color-panel) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sD] 'dired) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sE] 'edit-abbrevs) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sL] 'shell-command) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sM] 'manual-entry) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sS] 'ns-write-file-using-panel) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sa] 'mark-whole-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sc] 'ns-copy-including-secondary) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sd] 'isearch-repeat-backward) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ se] 'isearch-yank-kill) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sf] 'isearch-forward) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sg] 'isearch-repeat-forward) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sh] 'ns-do-hide-emacs) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sH] 'ns-do-hide-others) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sj] 'exchange-point-and-mark) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sk] 'kill-this-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sl] 'goto-line) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sm] 'iconify-frame) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sn] 'make-frame) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ so] 'ns-open-file-using-panel) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sp] 'ns-print-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sq] 'save-buffers-kill-emacs) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ ss] 'save-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ st] 'ns-popup-font-panel) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ su] 'revert-buffer) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sv] 'yank) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sw] 'delete-frame) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sx] 'kill-region) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sy] 'ns-paste-secondary) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) ? \ sz] 'undo) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) \ s- |?] 'shell-command-on-region) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) s-kp-bar] 'shell-command-on-region) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame) s-right] 'ns-next-frame) (define-key global-map [?\s-,] 'customize) (define-key global-map [?\s-'] 'next-multiframe-window) (define-key global-map [?\s-`] 'other-frame) (define-key global-map [?\s-~] 'ns-prev-frame) (define-key global-map [?\s--] 'center-line) (define-key global-map [?\s-:] 'ispell) (define-key global-map [?\s-?] 'info) (define-key global-map [?\s-^] 'kill-some-buffers) (define-key global-map [?\s-&] 'kill-this-buffer) (define-key global-map [?\sC] 'ns-popup-color-panel) (define-key global-map [?\sD] 'dired) (define-key global-map [?\sE] 'edit-abbrevs) (define-key global-map [?\sL] 'shell-command) (define-key global-map [?\sM] 'manual-entry) (define-key global-map [?\sS] 'ns-write-file-using-panel) (define-key global-map [?\sa] 'mark-whole-buffer) (define-key global-map [?\sc] 'ns-copy-including-secondary) (define-key global-map [?\sd] 'isearch-repeat-backward) (define-key global-map [?\se] 'isearch-yank-kill) (define-key global-map [?\sf] 'isearch-forward) (define-key global-map [?\sg] 'isearch-repeat-forward) (define-key global-map [?\sh] 'ns-do-hide-emacs) (define-key global-map [?\sH] 'ns-do-hide-others) (define-key global-map [?\sj] 'exchange-point-and-mark) (define-key global-map [?\sk] 'kill-this-buffer) (define-key global-map [?\sl] 'goto-line) (define-key global-map [?\sm] 'iconify-frame) (define-key global-map [?\sn] 'make-frame) (define-key global-map [?\so] 'ns-open-file-using-panel) (define-key global-map [?\sp] 'ns-print-buffer) (define-key global-map [?\sq] 'save-buffers-kill-emacs) (define-key global-map [?\ss] 'save-buffer) (define-key global-map [?\st] 'ns-popup-font-panel) (define-key global-map [?\su] 'revert-buffer) (define-key global-map [?\sv] 'yank) (define-key global-map [?\sw] 'delete-frame) (define-key global-map [?\sx] 'kill-region) (define-key global-map [?\sy] 'ns-paste-secondary) (define-key global-map [?\sz] 'undo) (define-key global-map [?\s-|] 'shell-command-on-region) (define-key global-map [s-kp-bar] 'shell-command-on-region) ;; (as in Terminal.app) (define-key global-map [s-right] 'ns-next-frame) (define-key global-map [s-left] 'ns-prev-frame)

Here is an example for ctrl + opt + command + s on a wired mini keyboard Apple Apple:

 (define-key global-map (kbd "<MCs-268632083>") 'help-for-help)
+1
source

More articles:


All Articles