                 " "
                 mode-line-misc-info
                 celestial-mode-line-string
-                " ("
-                (company-mode company-lighter)
-                ") "
                 mode-line-end-spaces
                 "%-"))
 

                                  "\nmouse-2: Switch to another buffer"
                                  "\nmouse-3: Next buffer"
                                  "\npath: " (buffer-file-name))
                mouse-face mode-line-highlight
                local-map (keymap
                           (mode-line . (keymap (mouse-1 . previous-buffer)

              '("%e"
                mode-line-front-space
                (:eval (if (eq defining-kbd-macro t)
                           (concat (propertize "[M]" 'face '((t (:background "red" :foreground "white" :weight bold)))) " ")))
                mode-line-mule-info
                mode-line-modified

