26 lines
1.1 KiB
EmacsLisp
26 lines
1.1 KiB
EmacsLisp
;;; windows.el -- summary
|
|
;;; Commentary:
|
|
;;; Windows management things, mostly with purpose
|
|
;;; Code:
|
|
(purpose-mode t)
|
|
|
|
(add-to-list 'purpose-user-regexp-purposes '("_spec.rb\\(<.*>\\)?$" . test))
|
|
(add-to-list 'purpose-user-mode-purposes '(ruby-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(yaml-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(emacs-lisp-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(web-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(html-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(scss-mode . test))
|
|
(add-to-list 'purpose-user-mode-purposes '(css-mode . test))
|
|
(add-to-list 'purpose-user-mode-purposes '(javascript-mode . edit))
|
|
(add-to-list 'purpose-user-mode-purposes '(magit-mode . tr))
|
|
(add-to-list 'purpose-user-mode-purposes '(dired-mode . tr))
|
|
(add-to-list 'purpose-user-mode-purposes '(compilation-mode . tr))
|
|
(add-to-list 'purpose-user-mode-purposes '(help-mode . br))
|
|
(add-to-list 'purpose-user-mode-purposes '(special-mode . br))
|
|
|
|
|
|
(setq purpose-use-default-configuration nil)
|
|
(purpose-compile-user-configuration)
|
|
|
|
;;; windows.el ends here
|