-;;; cedit.el --- a speed reading mode
+;;; spray.el --- a speed reading mode
;; Copyright (C) 2014 zk_phi
;; Author: zk_phi
;; URL: http://hins11.yu-yake.com/
;; Author: Ian Kelling <ian@iankelling.org>
-;; Version: 0.0.1
+;; Version: 0.0.2
;;; Commentary:
;;; Change Log:
;; 0.0.0 test release
;; 0.0.1 add spray-set-margins
+;; 0.0.2 margin options, speed control, better quit
;;; Code:
:foreground (face-foreground 'default)
:slant 'normal)
-(make-face 'spray-orp-face)
-(set-face-attribute 'spray-orp-face nil
+(make-face 'spray-accent-face)
+(set-face-attribute 'spray-accent-face nil
:foreground "red"
:overline (face-foreground 'default)
:underline (face-foreground 'default)
(overlay-put spray--base-overlay 'priority 100)
(overlay-put spray--base-overlay 'face 'spray-base-face)
(overlay-put spray--orp-overlay 'priority 101)
- (overlay-put spray--orp-overlay 'face 'spray-orp-face)
+ (overlay-put spray--orp-overlay 'face 'spray-accent-face)
(spray-start))
(t
(setq cursor-type spray--saved-cursor-type)