[Fix #663] Make guru-mode warn by default

This commit is contained in:
Bozhidar Batsov 2014-09-14 08:57:02 +03:00
parent 822a595a6b
commit fda768992e
2 changed files with 8 additions and 7 deletions

View file

@ -587,19 +587,17 @@ If you get some http connection error related to the MELPA repo
just do a manual `M-x package-refresh-contents` and restart Emacs just do a manual `M-x package-refresh-contents` and restart Emacs
afterwards. afterwards.
### No arrow navigation in editor buffers ### Warnings on arrow navigation in editor buffers
This is not a bug - it's a feature! I firmly believe that the one true This is not a bug - it's a feature! I firmly believe that the one true
way to use Emacs is by using it the way it was intended to be used (as way to use Emacs is by using it the way it was intended to be used (as
far as navigation is concerned at least). That's why I've disabled all far as navigation is concerned at least).
movement commands with arrows (and keys like page up, page down,
etc) - to prevent you from being tempted to use them.
If you'd like to be able to use the arrow keys (but still be reminded of If you'd like to be take this a step further and disable the arrow key navigation
the alternatives) put this in your personal config: completely put this in your personal config:
```lisp ```lisp
(setq guru-warn-only t) (setq guru-warn-only nil)
``` ```
To disable `guru-mode` completely add the following snippet to your To disable `guru-mode` completely add the following snippet to your

View file

@ -117,6 +117,9 @@ This functions should be added to the hooks of major modes for programming."
'(((lambda (&rest _ignored) '(((lambda (&rest _ignored)
(prelude-smart-open-line-above)) "RET"))) (prelude-smart-open-line-above)) "RET")))
;; enlist a more liberal guru
(setq guru-warn-only t)
(defun prelude-prog-mode-defaults () (defun prelude-prog-mode-defaults ()
"Default coding hook, useful with any programming language." "Default coding hook, useful with any programming language."
(when (and (executable-find ispell-program-name) (when (and (executable-find ispell-program-name)