1 files changed, 18 insertions, 6 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index b749a10..619bff2 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -531,6 +531,7 @@
 ;; ones.
 
 ;; #+BEGIN_SRC emacs-lisp
+(add-to-list 'byte-compile-not-obsolete-funcs #'projectile-global-mode)
 (use-package projectile
   :bind (("s-p" . projectile-switch-project)
          ("C-c C-f" . projectile-find-file)
@@ -593,7 +594,6 @@
 
 (use-package counsel-projectile
   :after (counsel projectile)
-  :bind (("C-c p s s" . counsel-projectile-rg))
   :config (progn
             (counsel-projectile-on)
             (def-projectile-commander-method ?A
@@ -880,7 +880,10 @@
 
 ;; #+BEGIN_SRC emacs-lisp
 (use-package editorconfig
-  :diminish "EC"
+  :diminish editorconfig-mode
+  :init (progn
+          (unless (executable-find "editorconfig")
+            (warn "Missing `editorconfig' executable.")))
   :config (editorconfig-mode 1))
 ;; #+END_SRC
 
@@ -1118,7 +1121,7 @@
 ;; #+BEGIN_SRC emacs-lisp
 (use-package company
   :commands (company-mode)
-  :diminish "Cmpl"
+  :diminish " C"
   :bind* (("C-<tab>" . company-complete))
   :bind  (("TAB" . company-indent-or-complete-common))
   :init (progn
@@ -1933,6 +1936,11 @@ With prefix TO-CURRENT-BUFFER, insert command output into buffer."
 
 
 ;;;;; Programming
+
+(define-hook-helper prog-mode ()
+  :name long-lines
+  (setq-local truncate-lines t))
+
 ;;;;;; flycheck
 
 ;; On-the-fly error checking in programming modes?  Yes please.
@@ -2071,7 +2079,7 @@ With prefix TO-CURRENT-BUFFER, insert command output into buffer."
 ;; let bindings.
 ;; #+BEGIN_SRC emacs-lisp
 (use-package redshank
-  :diminish " Λ"
+  :diminish redshank-mode
   :after (paredit)
   :config (progn
             (add-hook 'lisp-mode-common-hook #'turn-on-redshank-mode)))
@@ -2274,6 +2282,7 @@ With prefix TO-CURRENT-BUFFER, insert command output into buffer."
 ;; #+BEGIN_SRC emacs-lisp
 (use-package js2-refactor
   :after js2-mode
+  :diminish js2-refactor-mode
   :config (progn
             (bind-key "C-k" #'js2r-kill js2-mode-map)
             (add-hook 'js2-mode-hook #'js2-refactor-mode)
@@ -2634,7 +2643,7 @@ Pass ARG to `comint-delchar-or-maybe-eof'."
 (put 'downcase-region 'disabled nil)
 (setq sentence-end-double-space t
       line-move-visual nil)
-(setq-default truncate-lines t)
+(setq-default truncate-lines nil)
 ;; #+END_SRC
 
 ;;;;;; align
@@ -2751,7 +2760,10 @@ Pass ARG to `comint-delchar-or-maybe-eof'."
 ;; #+BEGIN_SRC emacs-lisp
 (use-package beginend
   :config (progn
-            (beginend-setup-all)))
+            (beginend-setup-all)
+            (seq-do (lambda (modepair)
+                      (diminish (cdr modepair)))
+                    beginend-modes)))
 ;; #+END_SRC
 
 ;;;;;; fontawesome