Fix eww-mu4e-messages

This commit is contained in:
2024-08-16 21:18:05 -07:00
parent bac0d1a109
commit c9a999f5a2

View File

@ -3,7 +3,7 @@
(require 'server)
(princ
(if-let ((modeline-string (server-eval-at "server" '(mu4e--modeline-string)))
((string-match "/\\([0-9]+\\) $" modeline-string))
((string-match "\\([0-9]+\\)\\((\\+1)\\)?/[0-9]+ $" modeline-string))
(matched-string (match-string 1 modeline-string)))
(progn
(set-text-properties 0 (length matched-string)