Skip to content

Commit

Permalink
Removing the ElDoc minor mode from modeline.
Browse files Browse the repository at this point in the history
As well as a few other minor mode messages.
  • Loading branch information
howardabrams committed Jan 14, 2016
1 parent 29e3a57 commit eae07d5
Show file tree
Hide file tree
Showing 2 changed files with 24 additions and 5 deletions.
19 changes: 14 additions & 5 deletions emacs-mode-line.org
Expand Up @@ -56,15 +56,24 @@

Now, let's create our own theme:

#+BEGIN_SRC elisp
#+BEGIN_SRC elisp
(defun powerline-simpler-vc-mode (s)
(if s
(replace-regexp-in-string "Git[:-]" "" s)
s))

;; Some point, we could change the text of the minor modes, but we
;; need to get the text properties and sub them /back in/. To be
;; figured out later... Like:
;; (let* ((props (text-properties-at 1 s))
;; (apple (set-text-properties 0 1 props "⌘"))
;; (fly-c (set-text-properties 0 1 props "✓"))
;; (news1 (replace-regexp-in-string "񓵸" apple s)))
;; (news2 (replace-regexp-in-string "FlyC" fly-c news1)))

(defun powerline-simpler-minor-display (s)
(replace-regexp-in-string
(concat " " (mapconcat 'identity '("Projectile" "Fill" "BufFace") "\\|")) "" s))
(replace-regexp-in-string
(concat " " (mapconcat 'identity '("񓵸" "Projectile" "Fill" "BufFace") "\\|")) "" s))

(defun powerline-ha-theme ()
"A powerline theme that removes many minor-modes that don't serve much purpose on the mode-line."
Expand Down Expand Up @@ -120,7 +129,7 @@
(powerline-raw " :" face2)

(powerline-simpler-minor-display
(powerline-minor-modes face2 'l))
(powerline-minor-modes face2 'l))

(powerline-raw " " face2)
(funcall separator-right face2 face1))))
Expand All @@ -136,7 +145,7 @@
(powerline-render rhs)))))))

(powerline-ha-theme)
#+END_SRC
#+END_SRC

* Technical Artifacts

Expand Down
10 changes: 10 additions & 0 deletions emacs.org
Expand Up @@ -1449,6 +1449,16 @@

Many programming language environments can benefit from this section.

*** ElDoc

I like ElDoc support (when I can get it), but not needed in the
mode line:

#+BEGIN_SRC elisp
(use-package eldoc
:diminish eldoc-mode)
#+END_SRC

*** Tag Support

All programming languages require some sort of tagging. but after
Expand Down

0 comments on commit eae07d5

Please sign in to comment.