spacemacs/layers/+os/osx/keybindings.el
syl20bnr 9d0558992c layers directory: create new categories
+chat
+checkers
+emacs
+intl
+os
+pair-programming
+tags
+theme
+web-services
2016-03-23 21:39:43 -04:00

36 lines
1.5 KiB
EmacsLisp

(when (spacemacs/system-is-mac)
(spacemacs/set-leader-keys "bf" 'reveal-in-osx-finder)
;; this is only applicable to GUI mode
(when (display-graphic-p)
;; Treat command as super
(setq mac-command-key-is-meta nil)
(setq mac-command-modifier 'super)
(when osx-use-option-as-meta
;; Treat option as meta
(setq mac-option-key-is-meta t))
(setq mac-option-modifier (if osx-use-option-as-meta 'meta nil))
;; Keybindings
(global-set-key (kbd "s-=") 'spacemacs/scale-up-font)
(global-set-key (kbd "s--") 'spacemacs/scale-down-font)
(global-set-key (kbd "s-0") 'spacemacs/reset-font-size)
(global-set-key (kbd "s-q") 'save-buffers-kill-terminal)
(global-set-key (kbd "s-v") 'yank)
(global-set-key (kbd "s-c") 'evil-yank)
(global-set-key (kbd "s-a") 'mark-whole-buffer)
(global-set-key (kbd "s-x") 'kill-region)
(global-set-key (kbd "s-w") 'delete-window)
(global-set-key (kbd "s-W") 'delete-frame)
(global-set-key (kbd "s-n") 'make-frame)
(global-set-key (kbd "s-z") 'undo-tree-undo)
(global-set-key (kbd "s-s")
(lambda ()
(interactive)
(call-interactively (key-binding "\C-x\C-s"))))
(global-set-key (kbd "s-Z") 'undo-tree-redo)
(global-set-key (kbd "C-s-f") 'spacemacs/toggle-frame-fullscreen)
;; Emacs sometimes registers C-s-f as this weird keycode
(global-set-key (kbd "<C-s-268632070>") 'spacemacs/toggle-frame-fullscreen)))