Zander671/random-scripts
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix eww-mu4e-messages

Browse Source
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
1 changed files with 12 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
eww/eww-mu4e-messages
View File

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