From b11f18d77fc0ec07cdf227dc0f67660cf7e2666a Mon Sep 17 00:00:00 2001
From: Jaidyn Ann <10477760+JadedCtrl@users.noreply.github.com>
Date: Wed, 2 Oct 2024 10:10:45 -0500
Subject: [PATCH] Fix shell-command composition bug

---
 imeks.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/imeks.el b/imeks.el
index cd1edec..cc9c014 100644
--- a/imeks.el
+++ b/imeks.el
@@ -94,7 +94,7 @@ if an X keyboard."
 (nconc delete-frame-functions '(imeks--handle-delete-frame))
 
 
-
+;;
 ;;; Util
 ;;; ―――――――――――――――――――――――――――――――――――――
 (defun xdotool-type-string (string &optional delay)
@@ -108,13 +108,14 @@ Optionally waits a DELAY in seconds before typing the string."
                             imeks-xdotool-path line))
                   (string-lines string)))
          (type-cmd ; Work-around, since not all programs accept a typed newline.
-          (reduce (lambda (a b)
-                    (format "%s; %s key return; %s" a imeks-xdotool-path b))
-                  type-cmds))
+          (seq-reduce (lambda (a b)
+                        (if a
+                            (format "%s; %s key return; %s" a imeks-xdotool-path b)
+                            b))
+                  type-cmds nil))
          (cmd-string
           (concat sleep-cmd type-cmd)))
     (call-process "bash" nil 0 nil
                   "-c" cmd-string)))
 
-
 (provide 'imeks)