From c7f1f63ee1b07fbb7ba100c0954471093c124182 Mon Sep 17 00:00:00 2001
From: Andros Fenollosa <andros@fenollosa.email>
Date: Tue, 19 Jan 2021 17:20:46 +0100
Subject: [PATCH] Update variables assignaments

---
 burn.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/burn.el b/burn.el
index 7385d83..f4a4f35 100644
--- a/burn.el
+++ b/burn.el
@@ -1,3 +1,4 @@
+-*- lexical-binding: t; -*-
 ;;; burn.el --- Burn your code by replacing it with 🔥
 
 ;; Copyright © 2020 Erick Navarro
@@ -11,10 +12,11 @@
 
 ;;; Code:
 
-(setf burn--emoji "🔥")
-(setf burn--interval 0.001)
+(defvar burn--emoji "🔥")
+(defvar burn--interval 0.001)
 
 (defun burn--is-empty ()
+  "Check if there is nothing left to burn."
   (= 0 (length
         (replace-regexp-in-string (concat "\\`[ \t\n" burn--emoji "]*") ""
                                   (replace-regexp-in-string (concat "[ \t\n" burn--emoji "]*\\'") "" (buffer-string))))))
@@ -36,8 +38,7 @@
   (while (not (burn--is-empty))
     (sit-for burn--interval)
     (burn--replace-backward-at-point)
-    (burn--replace-forward-at-point)
-    )
+    (burn--replace-forward-at-point))
   (erase-buffer))
 
 ;;; burn.el ends here