tvl-depot/init/nixos.el

65 lines
1.8 KiB
EmacsLisp
Raw Normal View History

;; Configure additional settings if this is one of my NixOS machines
;; (i.e. if ExWM is required)
;; -*- lexical-binding: t; -*-
(require 's)
(require 'f)
(defvar is-nixos
(let ((os-f "/etc/os-release"))
(s-contains?
"NixOS" (if (f-file? os-f) (f-read os-f)))))
(if is-nixos
(progn
(message "Running on NixOS, configuring ExWM.")
(require 'exwm)
(require 'exwm-config)
2017-11-15 18:56:01 +01:00
(require 'exwm-cm)
(fringe-mode 3)
(setq exwm-workspace-number 2)
;; Make class name the buffer name
(add-hook 'exwm-update-class-hook
(lambda ()
(exwm-workspace-rename-buffer exwm-class-name)))
;; 's-r': Reset
(exwm-input-set-key (kbd "s-r") #'exwm-reset)
;; 's-w': Switch workspace
(exwm-input-set-key (kbd "s-w") #'exwm-workspace-switch)
;; 's-N': Switch to certain workspace
(dotimes (i 10)
(exwm-input-set-key (kbd (format "s-%d" i))
`(lambda ()
(interactive)
(exwm-workspace-switch-create ,i))))
;; Launch applications with completion (dmenu style!)
(exwm-input-set-key (kbd "s-p") #'helm-run-external-command)
;; Toggle between line-mode / char-mode
(exwm-input-set-key (kbd "C-c C-t C-t") #'exwm-input-toggle-keyboard)
;; Line-editing shortcuts
(exwm-input-set-simulation-keys
'(([?\C-d] . delete)
([?\C-w] . ?\C-c)))
;; Enable EXWM
(exwm-enable)
2017-11-15 18:56:01 +01:00
;; Configure compositor
(setq exwm-cm-opacity 95)
(exwm-cm-enable)
;; Show time in the mode line
(display-time-mode)
;; Let buffers move seamlessly between workspaces
(setq exwm-workspace-show-all-buffers t)
(setq exwm-layout-show-all-buffers t)))
2017-11-15 18:56:01 +01:00
(provide 'nixos)