diff --git a/speed-type.el b/speed-type.el
index a7578cd..95ed4c4 100644
--- a/speed-type.el
+++ b/speed-type.el
@@ -114,7 +114,7 @@ To remove without replacement, use the form: `(bad-string . \"\")'"
   :group 'speed-type)
 
 (defface speed-type-mistake
-  `((t (:inherit 'default :foreground ,(face-foreground 'warning) :underline t)))
+  `((t (:inherit 'default :foreground ,(face-foreground 'error) :underline t)))
   "Face for incorrectly typed characters."
   :group 'speed-type)