forked from redguardtoo/emacs.d
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathinit-artbollocks-mode.el
34 lines (30 loc) · 1.2 KB
/
init-artbollocks-mode.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
;; @see https://github.com/sachac/.emacs.d/blob/gh-pages/Sacha.org
(require 'artbollocks-mode)
;; Avoid these phrases
(setq artbollocks-weasel-words-regex
(concat "\\b" (regexp-opt
'("one of the"
"should"
"just"
"sort of"
"a lot"
"probably"
"maybe"
"perhaps"
"I think"
"really"
"pretty"
"nice"
"action"
"utilize"
"leverage") t) "\\b"))
;; Don't show the art critic words, or at least until I figure
;; out my own jargon
(setq artbollocks-jargon nil)
(add-hook 'text-mode-hook 'artbollocks-mode)
;; FIXME: disable only inside org-mode
(defun artbollocks-reading-ease-disable ()
"Disable key-binding C-c / due to it's conflict with org-sparse-tree."
(define-key artbollocks-mode-keymap (kbd "C-c /") nil))
(add-hook 'artbollocks-mode-hook 'artbollocks-reading-ease-disable)
(provide 'init-artbollocks-mode)