From e9ab37b86563cb258efbad4274a4373781be42a8 Mon Sep 17 00:00:00 2001
From: Philip K <philip@warpmail.net>
Date: Mon, 27 Apr 2020 18:01:58 +0000
Subject: [PATCH] Improved user option types

---
 focus.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/focus.el b/focus.el
index 3485232..8bc4704 100644
--- a/focus.el
+++ b/focus.el
@@ -51,12 +51,12 @@ many derivatives should be placed by the end of the list.
 Things that are defined include `symbol', `list', `sexp',
 `defun', `filename', `url', `email', `word', `sentence',
 `whitespace', `line', and `page'."
-  :type '(repeat symbol)
+  :type '(alist :key-type symbol :valye-type symbol)
   :group 'focus)
 
 (defcustom focus-read-only-blink-seconds 1
   "The duration of a cursor blink in `focus-read-only-mode'."
-  :type '(float)
+  :type 'number
   :group 'focus)
 
 (defface focus-unfocused