Disable the extensions performed by fs

These could affect end-users.

Fixes #355

project.clj

@@ -12,7 +12,7 @@
                  ^:inline-dep [org.clojure/tools.reader "1.3.6"]
                  ^:inline-dep [cider/orchard "0.7.3"]
                  ^:inline-dep [cljfmt "0.8.0" :exclusions [rewrite-clj rewrite-cljs]]
-                 ^:inline-dep [clj-commons/fs "1.6.307"]
+                 ^:inline-dep [clj-commons/fs "1.6.310"]
                  ^:inline-dep [rewrite-clj "1.0.699-alpha"]
                  ^:inline-dep [version-clj "1.0.0"]]
   :exclusions [org.clojure/clojure] ; see versions matrix below

src/refactor_nrepl/core.clj

@@ -4,7 +4,6 @@
    [clojure.string :as str]
    [clojure.tools.namespace.parse :as parse]
    [clojure.tools.reader.reader-types :as readers]
-   [me.raynes.fs :as fs]
    [orchard.java.classpath :as cp]
    [orchard.misc :as misc]
    [refactor-nrepl.config :as config]
@@ -13,6 +12,10 @@
   (:import
    (java.io File FileReader PushbackReader StringReader)))
 
+;; Require our `fs` customizations before `fs` is loaded:
+(require '[refactor-nrepl.fs])
+(require '[me.raynes.fs :as fs])
+
 (defn version []
   (let [v (-> (or (io/resource "refactor-nrepl/refactor-nrepl/project.clj")
                   "project.clj")

src/refactor_nrepl/fs.clj

@@ -0,0 +1,7 @@
+(ns refactor-nrepl.fs
+  "Sets the compile-time feature-flags from the `fs` library.
+  This ns should be `require`d before any other `fs` ns."
+  (:require
+   [me.raynes.fs.feature-flags]))
+
+(alter-var-root #'me.raynes.fs.feature-flags/extend-coercions? (constantly false))

src/refactor_nrepl/rename_file_or_dir.clj

@@ -13,6 +13,10 @@
    (java.nio.file Files)
    (java.util.regex Pattern)))
 
+;; Require our `fs` customizations before `fs` is loaded:
+(require '[refactor-nrepl.fs])
+(require '[me.raynes.fs :as fs])
+
 (declare -rename-file-or-dir)
 
 (defn- chop-src-dir-prefix