Remove modeline customization in acdw/reading-mode

2 files changed, 1 insertions, 13 deletions

@@ -28,7 +28,6 @@ nntp+news.gwene.org:gwene.com.xkcd
 nntp+news.gwene.org:gwene.dance.hamster.blog
 nntp+news.gwene.org:gwene.de.uninformativ.blog.feeds.en
 nntp+news.gwene.org:gwene.info.benjaminwil.antisocial
-nntp+news.gwene.org:gwene.institute.tilde.xfnw.sandcats
 nntp+news.gwene.org:gwene.io.github.chrisman
 nntp+news.gwene.org:gwene.io.github.wphicks
 nntp+news.gwene.org:gwene.io.jao.blog
@@ -427,17 +427,7 @@ Prompt only if there are unsaved changes."
   (if acdw/reading-mode
       (progn ;; turn on
         ;; settings
-        (setq-local mode-line-format
-                    '(:eval
-                      (let* ((fmt " Reading %b")
-                             (len (length (format-mode-line fmt))))
-                        (concat
-                         (propertize " "
-                                     'display `((space :align-to (- right
-                                                                    ,len)))
-                                     'face '(:inherit italic))
-                         fmt)))
-                    orig-indicate-empty-lines indicate-empty-lines
+        (setq-local orig-indicate-empty-lines indicate-empty-lines
                     indicate-empty-lines nil
                     orig-indicate-buffer-boundaries indicate-buffer-boundaries
                     indicate-buffer-boundaries nil)
@@ -453,7 +443,6 @@ Prompt only if there are unsaved changes."
     ;; settings
     (setq-local indicate-empty-lines orig-indicate-empty-lines
                 indicate-buffer-boundaries orig-indicate-buffer-boundaries)
-    (kill-local-variable 'mode-line-format)
     ;; enable modes
     (dolist (mode '(display-fill-column-indicator-mode))
       (when (fboundp mode)