mirror of
https://github.com/jimeh/.emacs.d.git
synced 2026-02-19 13:46:41 +00:00
Jim Myhrberg
c791150a06
I've taken a lot of inspiration from Emacs-Prelude when it came to the structure of this rewritten config. I didn't want to use Prelude as I don't agree with all it's defaults, nor do I want to have to deal with any future changes in Prelude that might break things for me. So instead I went down the fully custom path, but heavily inspired by Prelude, both in terms of file/code structure, and also some of it's features. Compared to my old config setup, it's got most of the same things, but nearly everything is in a module file now, making it easy to fully enable/disable certain features.
27 lines
722 B
EmacsLisp
27 lines
722 B
EmacsLisp
;;
|
|
;; elscreen
|
|
;;
|
|
|
|
(siren-require-packages '(elscreen))
|
|
|
|
(require 'elscreen)
|
|
(define-key elscreen-map (kbd "C-z") elscreen-map)
|
|
|
|
;; Goto screens.
|
|
(global-set-key (kbd "s-}") 'elscreen-next)
|
|
(global-set-key (kbd "s-{") 'elscreen-previous)
|
|
|
|
;; Set screen nickname
|
|
(define-key elscreen-map (kbd ",") 'elscreen-screen-nickname)
|
|
(define-key elscreen-map (kbd "C-,") 'elscreen-screen-nickname)
|
|
|
|
;; Toggle screens.
|
|
(define-key elscreen-map (kbd "l") 'elscreen-toggle)
|
|
(define-key elscreen-map (kbd "C-l") 'elscreen-toggle)
|
|
|
|
;; Display list of screens.
|
|
(define-key elscreen-map (kbd ";") 'elscreen-display-screen-name-list)
|
|
(define-key elscreen-map (kbd "C-;") 'elscreen-display-screen-name-list)
|
|
|
|
|
|
(provide 'siren-elscreen) |