From 759d977879c54b378b4aa5290d9e370f3f475d68 Mon Sep 17 00:00:00 2001
From: Max Penet <mpenet@s-exp.com>
Date: Wed, 16 Nov 2022 17:13:13 +0100
Subject: [PATCH] allow normalize-keywords to work on cljs files (#1421) [skip
 ci]

---
 examples/normalize-keywords.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/examples/normalize-keywords.clj b/examples/normalize-keywords.clj
index d6292f8a..af3ff329 100644
--- a/examples/normalize-keywords.clj
+++ b/examples/normalize-keywords.clj
@@ -36,7 +36,7 @@
       (str (z/root zloc)))))
 
 (doseq [f (file-seq (io/file code))
-        :when (re-find #"\.clj[cdx]?$" (str f))
+        :when (re-find #"\.clj[cdsx]?$" (str f))
         :let [file-path (str f)]]
   (when-let [findings' (findings file-path)]
     (prn (format "Rewriting %s" file-path))