diff --git a/etc/init.lisp b/etc/init.lisp
index 2618f4f..d6f8c08 100644
--- a/etc/init.lisp
+++ b/etc/init.lisp
@@ -393,6 +393,8 @@
 
 (define-key "r"         #'refresh-chat-messages                         *chats-list-keymap*)
 
+(define-key "R"         #'refresh-chats                                 *chats-list-keymap*)
+
 (define-key "q"         #'close-chats-list-window                       *chats-list-keymap*)
 
 (define-key "C-J"       #'show-chat-to-screen                           *chats-list-keymap*)
diff --git a/src/follow-requests.lisp b/src/follow-requests.lisp
index fdf4fbf..0e9eb58 100644
--- a/src/follow-requests.lisp
+++ b/src/follow-requests.lisp
@@ -19,9 +19,8 @@
 (defclass follow-requests-window (focus-marked-window simple-line-navigation-window)
   ((requests
     :initarg  :requests
-    :initform nil
+    :initform ()
     :accessor requests
-    :type     (or null tooter:account)
     :documentation "All the accounts that request to follow you")
    (header-message-lines
     :initarg  :header-message-lines
diff --git a/src/ui-goodies.lisp b/src/ui-goodies.lisp
index d3cb69d..fa6a7fe 100644
--- a/src/ui-goodies.lisp
+++ b/src/ui-goodies.lisp
@@ -1561,7 +1561,7 @@ This command will remove those limits so that we can just jump to the last messa
 ;;;; chats
 
 (defun refresh-chats ()
-  "Refresh the chats, but not the chat's messages"
+  "Refresh the chats lists, but not the chat's messages"
   (program-events:push-event (make-instance 'program-events:get-chats-event)))
 
 (defun refresh-chat-messages ()