[nongnu] elpa/evil-goggles dd76fd3d28 019/225: Make sure the overlay is cleaned-up

[ELPA Syncer]

branch: elpa/evil-goggles
commit dd76fd3d28a79f3f82c3e83164721a990614e82b
Author: Evgeni Kolev <evgenysw@gmail.com>
Commit: Evgeni Kolev <evgenysw@gmail.com>

    Make sure the overlay is cleaned-up
---
 evil-goggles.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/evil-goggles.el b/evil-goggles.el
index 73b9ab0d4e..1ffaaf2ff4 100644
--- a/evil-goggles.el
+++ b/evil-goggles.el
@@ -50,14 +50,16 @@
   "Deafult face for the overlay")
 
 (defun evil-goggles--face (command)
+  "Return the configured face for COMMAND, or the default face."
   (or
    (assoc-default command evil-goggles-faces-alist)
    evil-goggles-default-face))
 
 (defun evil-goggles--show (beg end face)
   (let ((ov (evil-goggles--make-overlay beg end 'face face)))
-    (sit-for evil-goggles-show-for)
-    (delete-overlay ov)))
+    (unwind-protect
+        (sit-for evil-goggles-show-for)
+      (delete-overlay ov))))
 
 (defun evil-goggles--make-overlay (beg end &rest properties)
   (let ((ov (make-overlay beg end)))