Fix eww-mu4e-messages

This commit is contained in:
Alexander Rosenberg 2024-08-18 09:54:18 -07:00
parent c9a999f5a2
commit a6fa3120d6
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730

View File

@ -2,6 +2,7 @@
;;; -*- mode: emacs-lisp; lexical-binding: t -*-
(require 'server)
(princ
(condition-case _
(if-let ((modeline-string (server-eval-at "server" '(mu4e--modeline-string)))
((string-match "\\([0-9]+\\)\\((\\+1)\\)?/[0-9]+ $" modeline-string))
(matched-string (match-string 1 modeline-string)))
@ -10,5 +11,7 @@
nil
matched-string)
matched-string)
"0"))
"0")
(error
"0")))
(terpri)