cce926d60f
I mistakenly mapped one of my dual-function keys on my Ergodox to send Shift+CMD instead of CMD. When some of my Emacs keybindings weren't firing, I noticed that the key event they received was some like `C-S-s-<char>` instead of say `C-s-<char>`. As a quick fix, I duplicated each of my keybindings that relied on the CMD key to support Shift+CMD as well until I remapped the key on my Ergodox. This morning, I remapped the Shift+CMD key to CMD, so I'm bidding adieu to this code.
49 lines
1.6 KiB
EmacsLisp
49 lines
1.6 KiB
EmacsLisp
;;; keybindings.el --- Centralizing my keybindings -*- lexical-binding: t -*-
|
|
;; Author: William Carroll <wpcarro@gmail.com>
|
|
|
|
;;; Commentary:
|
|
;; Attempting to centralize my keybindings to simplify my configuration.
|
|
|
|
;;; Code:
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Dependencies
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
(require 'clipboard)
|
|
(require 'screen-brightness)
|
|
(require 'chrome)
|
|
(require 'scrot)
|
|
(require 'ivy-clipmenu)
|
|
(require 'term-switcher)
|
|
(require 'general)
|
|
(require 'window-manager)
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; Configuration
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
(defmacro keybinding/exwm (c fn)
|
|
"Bind C to FN using `exwm-input-set-key' with `kbd' applied to C."
|
|
`(exwm-input-set-key (kbd ,c) ,fn))
|
|
|
|
(keybinding/exwm "C-M-v" #'ivy-clipmenu/copy)
|
|
|
|
(keybinding/exwm "<XF86MonBrightnessUp>" #'screen-brightness/increase)
|
|
(keybinding/exwm "<XF86MonBrightnessDown>" #'screen-brightness/decrease)
|
|
|
|
(keybinding/exwm "<XF86AudioMute>" #'pulse-audio/toggle-mute)
|
|
(keybinding/exwm "<XF86AudioLowerVolume>" #'pulse-audio/decrease-volume)
|
|
(keybinding/exwm "<XF86AudioRaiseVolume>" #'pulse-audio/increase-volume)
|
|
(keybinding/exwm "<XF86AudioMicMute>" #'pulse-audio/toggle-microphone)
|
|
|
|
(keybinding/exwm "C-M-c" #'chrome/browse)
|
|
|
|
(keybinding/exwm (kbd/raw 'x11 "s") #'scrot/select)
|
|
|
|
(keybinding/exwm "<C-M-tab>" #'exwm/switch-to-exwm-buffer)
|
|
|
|
(general-define-key (kbd/raw 'x11 "t") #'ts/switch-to-terminal)
|
|
|
|
(provide 'keybindings)
|
|
;;; keybindings.el ends here
|