[Emacspeak] [PATCH] 2 minor code fixes

[Tim Cross <theophilusx@xxxxxxxxxxx>]

From 10b0f5037cf0e0d08c8dba14d0cece96d7c08d3b Mon Sep 17 00:00:00 2001
From: Tim Cross <theophilusx@xxxxxxxxxxx>
Date: Fri, 20 May 2022 13:09:34 +1000
Subject: [PATCH 4/5] Fix missing quote on select-object symbol

---
 lisp/dtk-speak.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/dtk-speak.el b/lisp/dtk-speak.el
index 827bec33b..28980bc61 100644
--- a/lisp/dtk-speak.el
+++ b/lisp/dtk-speak.el
@@ -1910,6 +1910,7 @@ Notification is logged in the notifications buffer unless `dont-log' is T. "
 
 (defun dtk-notify-using-voice (voice text &optional dont-log)
   "Use voice VOICE to speak text TEXT on notification stream."
+  (cl-declare (emacspeak-last-message))
   (unless dont-log (emacspeak-log-notification text))
   (setq emacspeak-last-message text)
   (let ((dtk-speaker-process (dtk-notify-process)))
-- 
2.34.1

From cbe07303b72f5856eded0936a87f7a37cb1cc507 Mon Sep 17 00:00:00 2001
From: Tim Cross <theophilusx@xxxxxxxxxxx>
Date: Fri, 20 May 2022 13:10:14 +1000
Subject: [PATCH 5/5] Add missing cl-declare for emacspeak-last-message

---
 lisp/emacspeak-windmove.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacspeak-windmove.el b/lisp/emacspeak-windmove.el
index c89aca270..26be36c30 100644
--- a/lisp/emacspeak-windmove.el
+++ b/lisp/emacspeak-windmove.el
@@ -65,7 +65,7 @@
   `(defadvice  ,f (after emacspeak pre act comp)
      "speak."
      (when (ems-interactive-p)
-       (emacspeak-auditory-icon select-object)
+       (emacspeak-auditory-icon 'select-object)
        (emacspeak-speak-mode-line)))))
 
 ;;}}}
-- 
2.34.1