From 924c7fa4199235a929ecd6a68a09b7e4acd36352 Mon Sep 17 00:00:00 2001
From: William Carroll <wpcarro@gmail.com>
Date: Wed, 2 Sep 2020 14:49:10 +0100
Subject: [PATCH] Debug undefined add-hook-before-save

`use-package` complains that `add-hook-before-save` doesn't exist. This is
because it's now named `macros-add-hook-before-save`.

This fixes that.
---
 emacs/.emacs.d/wpc/macros.el      |  2 +-
 emacs/.emacs.d/wpc/wpc-elixir.el  | 13 ++++++++++++-
 emacs/.emacs.d/wpc/wpc-haskell.el | 12 +++++++++++-
 emacs/.emacs.d/wpc/wpc-rust.el    | 14 ++++++++++++--
 4 files changed, 36 insertions(+), 5 deletions(-)

diff --git a/emacs/.emacs.d/wpc/macros.el b/emacs/.emacs.d/wpc/macros.el
index 715ca3e43..07b88d8f5 100644
--- a/emacs/.emacs.d/wpc/macros.el
+++ b/emacs/.emacs.d/wpc/macros.el
@@ -38,7 +38,7 @@ Useful in `add-hook' calls."
 
 (defmacro macros-add-hook-before-save (mode f)
   "Register a hook, `F', for a mode, `MODE' more conveniently.
-Usage: (add-hook-before-save 'reason-mode-hook #'refmt-before-save)"
+Usage: (macros-add-hook-before-save 'reason-mode-hook #'refmt-before-save)"
   `(add-hook ,mode
              (lambda ()
                (add-hook 'before-save-hook ,f))))
diff --git a/emacs/.emacs.d/wpc/wpc-elixir.el b/emacs/.emacs.d/wpc/wpc-elixir.el
index 9209f81b2..0b5e39171 100644
--- a/emacs/.emacs.d/wpc/wpc-elixir.el
+++ b/emacs/.emacs.d/wpc/wpc-elixir.el
@@ -9,9 +9,20 @@
 ;; My preferences for working with Elixir / Erlang projects
 
 ;;; Code:
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Dependencies
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(require 'macros)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Configuration
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
 (use-package elixir-mode
   :config
-  (add-hook-before-save 'elixir-mode-hook #'elixir-format))
+  (macros-add-hook-before-save 'elixir-mode-hook #'elixir-format))
 
 (provide 'wpc-elixir)
 ;;; wpc-elixir.el ends here
diff --git a/emacs/.emacs.d/wpc/wpc-haskell.el b/emacs/.emacs.d/wpc/wpc-haskell.el
index 00c22ca73..f9ed8552e 100644
--- a/emacs/.emacs.d/wpc/wpc-haskell.el
+++ b/emacs/.emacs.d/wpc/wpc-haskell.el
@@ -10,10 +10,20 @@
 
 ;;; Code:
 
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Dependencies
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(require 'macros)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Configuration
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
 ;; font-locking, glyph support, etc
 (use-package haskell-mode
   :config
-  (add-hook-before-save 'haskell-mode #'haskell-align-imports))
+  (macros-add-hook-before-save 'haskell-mode #'haskell-align-imports))
 
 ;; LSP support
 (use-package lsp-haskell
diff --git a/emacs/.emacs.d/wpc/wpc-rust.el b/emacs/.emacs.d/wpc/wpc-rust.el
index f15c3d3c6..396d6349a 100644
--- a/emacs/.emacs.d/wpc/wpc-rust.el
+++ b/emacs/.emacs.d/wpc/wpc-rust.el
@@ -13,8 +13,18 @@
 ;; - `rustup component add rust-src`
 ;; - `rustup toolchain add nightly && cargo +nightly install racer`
 
-
 ;;; Code:
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Dependencies
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(require 'macros)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Configuration
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
 (use-package racer
   :config
   (setq rust-sysroot (->> "~/.cargo/bin/rustc --print sysroot"
@@ -26,7 +36,7 @@
 (use-package rust-mode
   :config
   (add-hook 'rust-mode-hook #'racer-mode)
-  (add-hook-before-save 'rust-mode-hook #'rust-format-buffer)
+  (macros-add-hook-before-save 'rust-mode-hook #'rust-format-buffer)
   (define-key rust-mode-map
     (kbd "TAB")
     #'company-indent-or-complete-common)