From 45e59eab514c11c69e5d0e619de967442ce1fddc Mon Sep 17 00:00:00 2001
From: marty hiatt <martianhiatus@riseup.net>
Date: Thu, 22 Feb 2024 10:31:25 +0100
Subject: make byte-compiler happier

---
 lisp/mastodon-toot.el | 3 ++-
 lisp/mastodon.el      | 4 +++-
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index 7ff3c34..e414552 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -155,7 +155,8 @@ If the original toot visibility is different we use the more restricted one."
   :type 'boolean)
 
 (defcustom mastodon-toot--emojify-in-compose-buffer nil
-  "Whether to enable `emojify' in the compose buffer.")
+  "Whether to enable `emojify' in the compose buffer."
+  :type 'boolean)
 
 (defcustom mastodon-toot--proportional-fonts-compose nil
   "Nonnil to enable using proportional fonts in the compose buffer.
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index abc7787..7a04c87 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -97,6 +97,8 @@
 (autoload 'mastodon-views--view-instance-description "mastodon-views")
 (autoload 'mastodon-views--view-lists "mastodon-views")
 (autoload 'mastodon-views--view-scheduled-toots "mastodon-views")
+(autoload 'mastodon-tl--dm-user "mastodon-tl")
+(autoload 'mastodon-tl--scroll-up-command "mastodon-tl")
 (autoload 'special-mode "simple")
 
 (defvar mastodon-tl--highlight-current-toot)
@@ -317,7 +319,7 @@ FORCE means to fetch from the server and update
         (setq mastodon-profile-credential-account
               ;; TODO: we should also signal a quit condition after like 5
               ;; secs here
-              (condition-case x
+              (condition-case nil
                   (eval req)
                 (t ; req fails, return old value
                  mastodon-profile-credential-account)))
-- 
cgit v1.2.3