From 9d7fbf9463fafc590c40e9503a1df55665c42ee7 Mon Sep 17 00:00:00 2001 From: jao Date: Sun, 24 Apr 2022 03:58:21 +0100 Subject: eww title in mode-line also in emacs 28 --- lib/eos/jao-mode-line.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lib/eos/jao-mode-line.el b/lib/eos/jao-mode-line.el index 968ac35..0fd5a2e 100644 --- a/lib/eos/jao-mode-line.el +++ b/lib/eos/jao-mode-line.el @@ -71,6 +71,8 @@ ("") ("%n %2c %l " (:eval (format "%d" (line-number-at-pos (point-max))))))) +(defvar-local eww-data nil) + (defvar jao-mode-line--bid '(:eval (cond ((derived-mode-p 'gnus-group-mode 'gnus-article-mode @@ -78,6 +80,8 @@ mode-line-buffer-identification) ((derived-mode-p 'circe-channel-mode) (format "%s [%d]" (buffer-name) (length (circe-channel-nicks)))) + ((not (null eww-data)) + (or (plist-get eww-data :title) "No title")) (t "%b")))) (defvar jao-mode-line--format -- cgit v1.2.3