31 lines
1 KiB
EmacsLisp
31 lines
1 KiB
EmacsLisp
;;; windows.el -- summary
|
|
;;; Commentary:
|
|
;;; Windows management things, mostly with purpose
|
|
;;; Code:
|
|
(require 'window-purpose)
|
|
(purpose-mode t)
|
|
|
|
;; Ruby specific
|
|
(add-to-list 'purpose-user-regexp-purposes '("_spec.rb\\(<.*>\\)?$" . test))
|
|
(add-to-list 'purpose-user-regexp-purposes
|
|
'("COMMIT_EDITMSG\\(<.*>\\)?$" . code))
|
|
(add-to-list 'purpose-user-mode-purposes '(ruby-mode . code))
|
|
(add-to-list 'purpose-user-mode-purposes '(yaml-mode . code))
|
|
|
|
;; Tools
|
|
(add-to-list 'purpose-user-mode-purposes '(magit-mode . tools))
|
|
(add-to-list 'purpose-user-mode-purposes '(help-mode . tools))
|
|
(add-to-list 'purpose-user-mode-purposes '(helm-mode . tools))
|
|
(add-to-list 'purpose-user-mode-purposes '(compilation-mode . tools))
|
|
|
|
;; Markdown
|
|
(add-to-list 'purpose-user-mode-purposes '(markdown-mode . code))
|
|
|
|
;; Elisp
|
|
(add-to-list 'purpose-user-mode-purposes '(emacs-lisp-mode . code))
|
|
|
|
(setq purpose-use-default-configuration nil)
|
|
(purpose-compile-user-configuration)
|
|
(purpose-load-window-layout 'coding_with_magit)
|
|
|
|
;;; windows.el ends here
|