Preserve npm string-style requires for cljr-clean-ns

bugfix

Author: aiba

src/refactor_nrepl/ns/rebuild.clj

@@ -97,16 +97,22 @@
     :all
     (sort dependency-comparator referred)))
 
+(defn- type-preserving [f x]
+  (when x
+    (when-let [r (f x)]
+      (cond
+        (string? x) (str r)
+        (symbol? x) (symbol r)))))
+
 (defn- ns-prefix
   "Extracts the prefix from a libspec."
   [{:keys [ns]}]
-  (if (prefix ns)
-    (symbol (prefix ns))
-    :none))
+  (or (type-preserving prefix ns)
+      :none))
 
 (defn- ns-suffix
   [{:keys [ns]}]
-  (-> ns suffix symbol))
+  (type-preserving suffix ns))
 
 (defn- by-prefix
   [libspecs]
@@ -139,7 +145,7 @@
   [libspecs]
   (vec
    (for [libspec libspecs]
-     (create-libspec (update-in libspec [:ns] #(-> % suffix symbol))))))
+     (create-libspec (assoc libspec :ns (ns-suffix libspec))))))
 
 (defn- create-libspec-vectors-with-prefix
   [libspecs]