From 578ed1ba98510058cf48f897a9bf4e3391684120 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Thu, 30 Jan 2020 16:00:29 +0000 Subject: Move move .emacs.d out of configs/shared Moving all of my Emacs-related files into their own directory at the root of this repository. --- emacs/.emacs.d/wpc/keybindings.el | 46 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) create mode 100644 emacs/.emacs.d/wpc/keybindings.el (limited to 'emacs/.emacs.d/wpc/keybindings.el') diff --git a/emacs/.emacs.d/wpc/keybindings.el b/emacs/.emacs.d/wpc/keybindings.el new file mode 100644 index 000000000000..755311483dd1 --- /dev/null +++ b/emacs/.emacs.d/wpc/keybindings.el @@ -0,0 +1,46 @@ +;;; keybindings.el --- Centralizing my keybindings -*- lexical-binding: t -*- +;; Author: William Carroll + +;;; Commentary: +;; Attempting to centralize my keybindings to simplify my configuration. + +;;; Code: + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; Dependencies +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +(require 'clipboard) +(require 'screen-brightness) +(require 'chrome) +(require 'scrot) +(require 'ivy-clipmenu) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; 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 "" #'screen-brightness/increase) +(keybinding/exwm "" #'screen-brightness/decrease) + +(keybinding/exwm "" #'pulse-audio/toggle-mute) +(keybinding/exwm "" #'pulse-audio/decrease-volume) +(keybinding/exwm "" #'pulse-audio/increase-volume) +(keybinding/exwm "" #'pulse-audio/toggle-microphone) + +(keybinding/exwm "C-M-c" #'chrome/browse) + +(keybinding/exwm (kbd/raw 'x11 "s") #'scrot/select) + +;; TODO: I need this because my Ergodox EZ sends super+shift instead of just +;; super. Remove this once I fix my Ergodox. +(keybinding/exwm "C-S-s-s" #'scrot/select) + +(provide 'keybindings) +;;; keybindings.el ends here -- cgit 1.4.1