From fe5e410b74ca1c267d64ddb644d0f0ff47c1d412 Mon Sep 17 00:00:00 2001
From: TEC <tec@tecosaur.com>
Date: Thu, 29 Jul 2021 18:55:58 +0800
Subject: [PATCH] Mu4e: thread folding is too buggy, remove for now

I bumped to get bugfixes and got more bugs. If the situation improves in
future maybe we could add this back in.
---
 modules/email/mu4e/config.el   | 29 -----------------------------
 modules/email/mu4e/packages.el |  3 ---
 2 files changed, 32 deletions(-)

diff --git a/modules/email/mu4e/config.el b/modules/email/mu4e/config.el
index d87f716e5..90e95d8c8 100644
--- a/modules/email/mu4e/config.el
+++ b/modules/email/mu4e/config.el
@@ -213,35 +213,6 @@
   (advice-add 'mu4e~start :around #'+mu4e-lock-start)
   (advice-add 'mu4e-quit :after #'+mu4e-lock-file-delete-maybe))
 
-(use-package! mu4e-thread-folding
-  :after mu4e
-  :config
-  (setq mu4e-thread-folding-root-folded-prefix-string (propertize "▶ " 'face 'shadow)
-        mu4e-thread-folding-root-unfolded-prefix-string (propertize "▼ " 'face 'shadow))
-  (custom-set-faces!
-    '(mu4e-thread-folding-root-unfolded-face :weight bold :slant italic :inherit hl-line :extend t)
-    '(mu4e-thread-folding-child-face :inherit hl-line :extend t))
-  (map! :map mu4e-headers-mode-map
-        :ne "<tab>" #'mu4e-headers-toggle-at-point
-        :ne "<left>" #'mu4e-headers-fold-at-point
-        :ne "<S-left>" #'mu4e-headers-fold-all
-        :ne "<right>" #'mu4e-headers-unfold-at-point
-        :ne "<S-right>" #'mu4e-headers-unfold-all)
-
-  (when (featurep! :editor evil)
-    (defadvice! +mu4e-thread-folding-move-to-column-1-a (&rest _)
-      "Move the point to column 1.
-When using evil, having the cursor at column 0 causes issues,
-so we make sure that it's put a column 1 so everything works nicely."
-      :before #'mu4e-headers-toggle-at-point
-      :before #'mu4e-headers-fold-at-point
-      :before #'mu4e-headers-unfold-at-point
-      :before #'mu4e-headers-view-message
-      :before #'mu4e-compose-reply
-      :before #'mu4e-compose-forward
-      (unless (= (current-column) 1)
-        (move-to-column 1 t)))))
-
 (unless (featurep! +org)
   (after! mu4e
     (defun org-msg-mode (&optional _)
diff --git a/modules/email/mu4e/packages.el b/modules/email/mu4e/packages.el
index 6d8b6f047..883596a8b 100644
--- a/modules/email/mu4e/packages.el
+++ b/modules/email/mu4e/packages.el
@@ -5,6 +5,3 @@
   (package! org-msg :pin "4c92c627b6cfb234fd257b714a5dbfc72d7af8d2"))
 
 (package! mu4e-alert :pin "91f0657c5b245a9de57aa38391221fb5d141d9bd")
-
-(package! mu4e-thread-folding :recipe (:host github :repo "rougier/mu4e-thread-folding")
-  :pin "c6915585263a744b4da4a0e334393150603136dc")