ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Move set-ispell-local-en-dict to git library

Browse source
This commit is contained in:
Tom Willemse 2015-12-18 01:55:25 +01:00
parent ea6a2cea54
commit 7f35ee8c71
2 changed files with 10 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
emacs/.emacs.d/init.el
View file

@ -141,10 +141,6 @@ MODE1 is enabled and vice-versa."
"Set the `disabled' property for each item in FUNCTIONS to nil." "Set the `disabled' property for each item in FUNCTIONS to nil."
(mapc #'(lambda (f) (put f 'disabled nil)) functions)) (mapc #'(lambda (f) (put f 'disabled nil)) functions))
(defun oni:set-ispell-local-en-dict ()
"Set `ispell-local-dictionary' to en."
(setq ispell-local-dictionary "en_US"))
(defun oni:set-keys-for-dired () (defun oni:set-keys-for-dired ()
"Set some keybindings for `dired'." "Set some keybindings for `dired'."
(local-set-key (kbd "E") #'wdired-change-to-wdired-mode)) (local-set-key (kbd "E") #'wdired-change-to-wdired-mode))
@ -681,7 +677,10 @@ If no direction is given, don't split."
(add-hook 'css-mode-hook #'rainbow-mode) (add-hook 'css-mode-hook #'rainbow-mode)
(add-hook 'diary-display-hook 'diary-fancy-display) (add-hook 'diary-display-hook 'diary-fancy-display)
(add-hook 'git-commit-mode-hook #'oni:set-ispell-local-en-dict)
;; Make sure git commit messages are always checked in english.
(add-hook 'git-commit-mode-hook 'oni:set-ispell-local-en-dict)
(add-hook 'gnus-exit-group-hook 'oni:update-mailcount) (add-hook 'gnus-exit-group-hook 'oni:update-mailcount)
(add-hook 'gnus-exit-gnus-hook 'oni:update-mailcount) (add-hook 'gnus-exit-gnus-hook 'oni:update-mailcount)
(add-hook 'haskell-mode-hook 'turn-on-haskell-indentation) (add-hook 'haskell-mode-hook 'turn-on-haskell-indentation)

6
emacs/.emacs.d/site-lisp/oni-git.el
View file

@ -24,6 +24,7 @@
;;; Code: ;;; Code:
(require 'ispell)
(require 'magit) (require 'magit)
;;;###autoload ;;;###autoload
@ -56,5 +57,10 @@
default-directory "' request-pull " (when patchp "-p ") default-directory "' request-pull " (when patchp "-p ")
from " " url " " to)))))) from " " url " " to))))))
;;;###autoload
(defun oni:set-ispell-local-en-dict ()
"Set `ispell-local-dictionary' to en."
(setq ispell-local-dictionary "en_US"))
(provide 'oni-git) (provide 'oni-git)
;;; oni-git.el ends here ;;; oni-git.el ends here