[REF] Prefer aref to support older Emacs versions

KeyWeeUsr · Aug 17, 2024 · eeb26fd · eeb26fd
1 parent 7fdb983
commit eeb26fd
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/typewriter-roll-mode.el b/typewriter-roll-mode.el
@@ -79,8 +79,8 @@ Argument POS cursor's position."
 (defun typewriter-roll--check ()
   "Check after typing whether to scroll up as in typewriter."
   (when (or (typewriter-roll--is-backspace)
-            (eq last-command-event (char-from-name "SPACE")))
-    (unless (eq (char-before) (char-from-name "SPACE"))
+            (eq last-command-event (aref " " 0)))
+    (unless (eq (char-before) (aref " " 0))
         (typewriter-roll--scroll-main (current-column))
       (typewriter-roll--scroll-up))))