General Programming

I spend anywhere between 10%-90% of my week pair programming.

On a projector.

Being able to point to a line and give it a name like 45 is important.

(add-hook 'prog-mode-hook 'linum-mode)

Display the function on the mode line.

Only because I am an info-junkie. Not because it is particularly useful from a UI perspective.

(which-function-mode t)

Enforce checking of parens in programming modes. Not 100% sure about this yet. But 90% sure.

(defun emagician/check-parens ()
  (when after-init-time   ; Don't check parens if we're initializing. 
    (condition-case err
        (check-parens)
      ((error) (message "Buffer has unmatched Parens or quote!")))))

(add-hook 'prog-mode-hook 'emagician/check-parens t)

This config could use tweaking.

(setq show-paren-style 'mixed)
(setq show-paren-delay 0)
(show-paren-mode)

Not 100% sure about this yet.

Rainbow Delimiters are static. It's always the same color regardless of where the point is.

(use-package rainbow-delimiters
  :demand
  :init
  (emagician/minor-in-major-mode rainbow-delimiters-mode prog-mode-hook)
  :config
  (set-face-attribute 'rainbow-delimiters-depth-1-face nil :foreground "grey43")
  (set-face-attribute 'rainbow-delimiters-depth-2-face nil :foreground "grey45")
  (set-face-attribute 'rainbow-delimiters-depth-3-face nil :foreground "grey47")
  (set-face-attribute 'rainbow-delimiters-depth-4-face nil :foreground "grey50")
  (set-face-attribute 'rainbow-delimiters-depth-5-face nil :foreground "grey55")
  (set-face-attribute 'rainbow-delimiters-depth-6-face nil :foreground "grey60")
  (set-face-attribute 'rainbow-delimiters-depth-7-face nil :foreground "grey65")
  (set-face-attribute 'rainbow-delimiters-depth-8-face nil :foreground "grey70")
  (set-face-attribute 'rainbow-delimiters-depth-9-face nil :foreground "grey75"))

Trying an experiment. Syntax highlight blocks based on overline.

It sould have been hella cool, but what happens is that the rainbow-block-face over-rides the entire face.

I'll need to learn more about emacs faces to continue.

(use-package rainbow-blocks
  :demand
  :init
  (emagician/minor-in-major-mode rainbow-blocks-mode prog-mode-hook)
  :config
  (custom-set-faces
   '(rainbow-blocks-depth-1-face ((t (:overline "grey10"))))
   '(rainbow-blocks-depth-2-face ((t (:overline "grey20"))))
   '(rainbow-blocks-depth-3-face ((t (:overline "grey30"))))
   '(rainbow-blocks-depth-4-face ((t (:overline "grey40"))))
   '(rainbow-blocks-depth-5-face ((t (:overline "grey50"))))
   '(rainbow-blocks-depth-6-face ((t (:overline "grey60"))))
   '(rainbow-blocks-depth-7-face ((t (:overline "grey70"))))
   '(rainbow-blocks-depth-8-face ((t (:overline "grey80"))))
   '(rainbow-blocks-depth-9-face ((t (:overline "grey90"))))))

(foo (bar (baz BLag) (bar baz (foo bar (foo bar ) baz blarg (foo BLag) (bar baz (foo bar (foo bar ) baz blarg (foo ) ) far ) b00) barg ) blarg ) foo foo)

Like manna from heaven.

This is one of the coolest modes so far. Yeah, it's slightly angry fruit salad, but it is also just… wow. It doesn't NEED a mode lighter, but it deserves it.

(use-package color-identifiers-mode
  :diminish (color-identifiers-mode . "🎨 ")
  :init
  (add-hook 'after-init-hook 'global-color-identifiers-mode))

Whitespace unicode does good stuff with whitespace. Use that.

With unicode setup, it is much better.

(use-package whitespace
  :diminish "· "
  :init
  (add-hook 'prog-mode-hook 'whitespace-mode)
  (use-package unicode-whitespace
    :config
    (unicode-whitespace-setup 'subdued-faces)))

Oh man, with the unicode pretty symbols, this is sweet. I have been considering making the jump to FiraCode, but there is so many weird little things about it I am unsure of.

Prettify Symbols is 80% there, and looks freaking hawt.

(global-prettify-symbols-mode 1)

Sexy Org-mode mana from heaven inside of code.

(use-package outshine
  :init
  (add-hook 'outline-minor-mode-hook 'outshine-hook-function)
  (add-hook 'prog-mode-hook 'outline-minor-mode))

Probably one of the most disputed things when "growing up" as a programmer. It's seemed to have settled town to a tab stop of 2, with no physical Control I tabs.

Or maybe that's just age. I used to really want 4-space-wide physical tabs, but now, not so much. Explicit spaces are probably the easiest for everyone involved.

In short, it's fucking moot. Go with the project, and find peace. If it's really brutal, make computers format it for you incoming, and reformat it for everyone else outgoing.

(setq-default indent-tabs-mode nil)

Gah. So bad at this.

emagician/minor-in-major-mode doesn't work because flyspell-prog-mode doesn't take an argument.

(add-hook 'prog-mode-hook 'flyspell-prog-mode)

This is such a handy piece of functionality. It just works.

(defadvice yank (after indent-region activate)
  "indent the region after a yank if we're in a programming mode."
  (if (derived-mode-p 'prog-mode)
      (indent-region (region-beginning) (region-end) nil)))

The more boilerplate your language requires, the more abstractions it can afford the user.

There is always a little bit of boiler-plate that is required.

(add-hook 'prog-mode-hook 'yas-minor-mode-on)

I am not 100% convinced about these keybindings. Honestly I snarfed and barfed from another config somewhere.

(use-package smartparens
  :diminish "⒮"
  :bind (("M-9" . sp-backward-sexp)
         ("M-0" . sp-forward-sexp)
         :map smartparens-mode-map
         (("C-<right>" . sp-forward-slurp-sexp)
          ("C-<left>" . sp-forward-barf-sexp)
          ("C-M-<right>" . sp-backward-barf-sexp)
          ("C-M-<left>" . sp-backward-slurp-sexp)
          ("M-S-s" . sp-splice-sexp)))
  :init
  (add-hook 'prog-mode-hook #'turn-on-smartparens-mode)
  :config
  (add-to-list 'sp-sexp-suffix '(json-mode regex ""))
  (add-to-list 'sp-sexp-suffix '(es-mode regex ""))

  (require 'smartparens-config)
  (require 'smartparens-ruby)
  (add-hook 'sh-mode-hook
            (lambda ()
              ;; Remove when https://github.com/Fuco1/smartparens/issues/257
              ;; is fixed
              (setq sp-autoescape-string-quote nil)))

  ;; Remove '' pairing in elisp because quoting is used a ton
  (sp-local-pair 'minibuffer-inactive-mode "'" nil :actions nil)
  (sp-local-pair 'web-mode "<" nil :actions nil)
)

Modes for editing git-specific files.

(use-package git-commit)
(use-package gitconfig-mode)
(use-package gitignore-mode)

Magit is like manna from heaven.

It is seriously one of the coolest Emacs packages out there.

(use-package magit
  :diminish "🔮 "
  :init
  (when (locate-file "git-achievements" exec-path)
    (setq magit-git-executable "git-achievements"))
  :bind 
  ("C-c m" . magit-status)
  :config)

So pleasant.

(use-package git-gutter-fringe+
  :diminish (git-gutter+-mode . "")
  :init
  (setq git-gutter-fr+-side 'right-fringe)
  (add-hook 'text-mode-hook 'git-gutter+-mode)
  (add-hook 'prog-mode-hook 'git-gutter+-mode))

The last time I used projectile it was not what I needed at all.

But that was a long time ago.

Trying it again, it does not play well with tramp. A bit of a pity.

Now that I am off of tramp, maybe projectile will start to work again?

(use-package projectile
  :init
  (setq projectile-mode-line '(:eval (format " 📂[%s]" (projectile-project-name))))
  (projectile-global-mode))

(with-eval-after-load 'helm
  (use-package helm-projectile))