emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/nano-modeline 19b39f7 6/8: Cleanup code


From: ELPA Syncer
Subject: [elpa] externals/nano-modeline 19b39f7 6/8: Cleanup code
Date: Thu, 7 Oct 2021 06:57:25 -0400 (EDT)

branch: externals/nano-modeline
commit 19b39f7f47b6d40efa648bd3e10d99821c9d31f2
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Cleanup code
---
 nano-modeline.el | 34 +---------------------------------
 1 file changed, 1 insertion(+), 33 deletions(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 22e9897..2c779cf 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -703,44 +703,12 @@ depending on the version of mu4e."
   ;; Update selected window
   (nano-modeline--update-selected-window)
   ;; (setq nano-modeline--selected-window (selected-window))
-  
 
   (setq         mode-line-format nil)
   (setq-default mode-line-format nil)
   (setq         header-line-format nil)
   (setq-default header-line-format nil)
-  
-  ;;         ;; TTY mode top
-  ;; (cond ((and (not (display-graphic-p))
-  ;;             (eq nano-modeline-position 'top))
-  ;;        (setq mode-line-format nil)
-  ;;        (setq-default mode-line-format nil)
-  ;;        ;; (set-face-attribute 'mode-line nil :inherit 
'nano-modeline-active)
-  ;;        ;; (set-face-attribute 'mode-line-inactive nil :inherit 
'nano-modeline-inactive)
-  ;;        )
-
-  ;;       ;; TTY Mode bottom
-  ;;       ((and (not (display-graphic-p))
-  ;;             (eq nano-modeline-position 'top))
-  ;;        (setq header-line-format nil)
-  ;;        (setq-default header-line-format nil))
-    
-  ;;       ;; Graphic mode, modeline at top
-  ;;       ((eq nano-modeline-position 'top)
-  ;;        (setq mode-line-format nil) ;;(list ""))
-  ;;        (setq-default mode-line-format nil) ;;(list ""))
-  ;;        ;; (set-face-attribute 'mode-line nil :inherit 
'nano-modeline-active :height 0.1)
-  ;;        ;;(set-face-attribute 'mode-line-inactive nil :inherit 
'nano-modeline-inactive :height 0.1)
-  ;;        )
-     
-  ;;       ;; Graphic mode, modeline at bottom
-  ;;       (t
-  ;;        (setq header-line-format nil)
-  ;;        (setq-default header-line-format nil)
-  ;;        (set-face-attribute 'mode-line nil          :height 
(face-attribute 'default :height))
-  ;;        (set-face-attribute 'mode-line-inactive nil :height 
(face-attribute 'default :height)))
-  ;;       )
-     
+      
   (let* ((format
           '((:eval
              (cond



reply via email to

[Prev in Thread] Current Thread [Next in Thread]