From ab71fea6c85c4b6094f25df18cdc2459d65dfddb Mon Sep 17 00:00:00 2001 From: zk_phi Date: Fri, 13 Jun 2014 01:14:46 +0900 Subject: [PATCH] wp --- spray.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/spray.el b/spray.el index 7d42d01..402bf0f 100644 --- a/spray.el +++ b/spray.el @@ -1,5 +1,5 @@ ;; custom -(defvar spray-freq (/ 60.0 400) "60.0 / WPM") +(defvar spray-wpm 400 "words/min") (defvar spray-text-scale 5) (defvar spray-orp-face 'error) @@ -22,7 +22,7 @@ (cond (spray-mode (setq spray--orp-overlay (make-overlay 0 0) spray--padding-overlay (make-overlay 0 0) - spray--timer (run-with-timer 0 spray-freq 'spray-next) + spray--timer (run-with-timer 0 (/ 60.0 spray-wpm) 'spray-next) spray--saved-cursor-type cursor-type) (setq cursor-type nil) (text-scale-set spray-text-scale) -- 2.30.2