From 0f41457237fd4dd6931f224ffa397b2637a34367 Mon Sep 17 00:00:00 2001
From: David Morgan <djm_uk@protonmail.com>
Date: Thu, 8 Jun 2023 06:58:45 +0100
Subject: [PATCH] Fix Clojure subword-mode setup

---
 .emacs.d/lisp/init-clojure.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/.emacs.d/lisp/init-clojure.el b/.emacs.d/lisp/init-clojure.el
index d585d35..8dd1bf1 100644
--- a/.emacs.d/lisp/init-clojure.el
+++ b/.emacs.d/lisp/init-clojure.el
@@ -12,7 +12,6 @@
 (use-package clojure-mode
   :config
   (require 'flycheck-clj-kondo)
-  (subword-mode +1)
   (define-abbrev-table 'clojure-mode-abbrev-table
     '(("scs" "#sc/spy")
       ("scp" "#spy/p")
@@ -27,6 +26,10 @@
   (defun set-clojure-capf ()
     (add-hook 'completion-at-point-functions #'cape-clojure -99 t))
 
+  (defun clojure-mode-hook-fn ()
+    (set-clojure-capf)
+    (subword-mode +1))
+
   ;; https://github.com/weavejester/compojure/wiki/Emacs-indentation
   (define-clojure-indent
     (defroutes 'defun)
@@ -54,7 +57,7 @@
   (advice-add 'uniquify-get-proposed-name :around 'clj-uniquify-get-proposed-name)
 
   :hook
-  (clojure-mode . set-clojure-capf))
+  (clojure-mode . clojure-mode-hook-fn))
 
 (use-package clj-refactor
   :diminish