More tutorial

also change the mode-line color
This commit is contained in:
Jean-Philippe Bernardy 2014-10-23 21:02:34 +02:00
parent 02fcd0bcec
commit 7db0a398e0
2 changed files with 98 additions and 1297 deletions

File diff suppressed because it is too large Load diff

View file

@ -50,8 +50,9 @@
(let ((orig (point)))
(skip-chars-forward " " (line-end-position))
(when (eolp) (delete-and-extract-region orig (point))))))
(when (bound-and-true-p boon-modeline-face-cookie)
(face-remap-remove-relative boon-modeline-face-cookie))
(setq boon-modeline-face-cookie
(face-remap-add-relative
'mode-line '((:foreground "darkred") mode-line)))
(setq cursor-type 'bar))
(cond (boon-command-state
;; (do-auto-save)
@ -60,9 +61,8 @@
(line-number-at-pos (mark)))))
(push-mark)) ; remember where the last edition was by pushing a mark
(setq cursor-type 'box)
(setq boon-modeline-face-cookie
(face-remap-add-relative
'mode-line '((:foreground "darkred") mode-line))))
(when (bound-and-true-p boon-modeline-face-cookie)
(face-remap-remove-relative boon-modeline-face-cookie)))
(boon-off-state)
(boon-insert-state)
(t (message "Unknown state!")))