Mode line

1 files changed, 6 insertions, 5 deletions

diff --git a/smart-documents.org b/smart-documents.org
index 562b0b3..e8073e8 100644
--- a/smart-documents.org
+++ b/smart-documents.org
@@ -1007,11 +1007,12 @@ various customizations online.
                  '(:eval (if buffer-read-only
                              (propertize "🔒" 'help-echo "C-x C-q: unlock buffer.")
                            (propertize "🔓" 'help-echo "C-x C-q: lock buffer.")))
-                " " mode-line-buffer-identification " "
-                '(:eval (if (buffer-modified-p) "🖉" "✓"))
-                " " mode-line-modes " "
-                mode-line-end-spaces))
-
+                 '(:eval (if (buffer-modified-p)
+                             (propertize " 🖉 " 'help-echo "Buffer is modified.")
+                           (propertize " ✓ " 'help-echo "Buffer is saved.")))
+                 mode-line-buffer-identification " "
+                 mode-line-modes " "
+                 mode-line-end-spaces))
 #+END_SRC
 
 *** Emojis