Merge pull request #271 from dhleong/dhleong/improve-shadow-cljs-support

Improve shadow cljs support

Author: expez

CHANGELOG.md

@@ -6,6 +6,7 @@
 * [#256](https://github.com/clojure-emacs/refactor-nrepl/pull/256) ignore malformed artifact coordinates when fetching from Clojars.
 * [#264](https://github.com/clojure-emacs/refactor-nrepl/pull/264) less bandwidth used to fetch artifacts from Clojars
 * [#268](https://github.com/clojure-emacs/refactor-nrepl/pull/268) added support for fetching artifact versions from Clojars
+* [#271](https://github.com/clojure-emacs/refactor-nrepl/pull/271) improved shadow-cljs support
 
 ## 2.4.0
 

src/refactor_nrepl/core.clj

@@ -62,7 +62,7 @@
          start (if (fs/directory? path-or-file-in-project)
                  path-or-file-in-project
                  (fs/parent path-or-file-in-project))
-         names-at-root #{"project.clj" "build.boot" "build.gradle" "pom.xml" "deps.edn"}
+         names-at-root #{"project.clj" "build.boot" "build.gradle" "pom.xml" "deps.edn" "shadow-cljs.edn"}
          known-root-file? (fn [^File f] (some (fn [known-root-name]
                                                 (.endsWith (.getCanonicalPath f)
                                                            known-root-name))

src/refactor_nrepl/ns/libspecs.clj

@@ -16,7 +16,7 @@
 (defn- aliases-by-frequencies [libspecs]
   (->> libspecs
        (mapcat aliases) ; => [[str clojure.string] ...]
-       (sort-by second)
+       (sort-by (comp str second))
        (group-by first) ; => {str [[str clojure.string] [str clojure.string]] ...}
        (map (comp seq frequencies second)) ; => (([[set clojure.set] 4] [set set] 1) ...)
        (map (partial sort-by second >)) ; by decreasing frequency