1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/acdw-modeline.el b/lisp/acdw-modeline.el
index 6a11418..44bb889 100644
--- a/lisp/acdw-modeline.el
+++ b/lisp/acdw-modeline.el

@@ -86,7 +86,14 @@ indicator in the mode-line."
      (let* ((read-only (and buffer-read-only (buffer-file-name)))
             (modified (buffer-modified-p)))
        (propertize
-         (if read-only " =" (if modified " +" " -"))
+         (concat " "
+                 (cond
+                  ((derived-mode-p 'special-mode
+                                   'lui-mode)
+                   "~")
+                  (read-only "=")
+                  (modified "+")
+                  (t "-")))
         'help-echo (format
                     (concat "Buffer is %s and %smodified\n"
                             "mouse-1: Toggle read-only status.")