web: add mark as spam button to catchup mode

web/src/state.rs

@@ -692,6 +692,13 @@ pub fn update(msg: Msg, model: &mut Model, orders: &mut impl Orders<Msg>) {
             };
             orders.send_msg(Msg::CatchupNext);
         }
+        Msg::CatchupMarkAsSpam => {
+            if let Some(thread_id) = current_thread_id(&model.context) {
+                orders.send_msg(Msg::AddTag(thread_id.clone(), "Spam".to_string()));
+                orders.send_msg(Msg::SetUnread(thread_id, false));
+            };
+            orders.send_msg(Msg::CatchupNext);
+        }
         Msg::CatchupNext => {
             orders.send_msg(Msg::ScrollToTop);
             let Some(catchup) = &mut model.catchup else {
@@ -902,6 +909,7 @@ pub enum Msg {
     CatchupStart,
     CatchupKeepUnread,
     CatchupMarkAsRead,
+    CatchupMarkAsSpam,
     CatchupNext,
     CatchupExit,