Fix sr: add space when alias is after :refer

In case `:refer` is before `:as` clause there was no space between the
namespace and the `:as` keyword after the removel of `:refer`.

Author: benedekfazekas

clj-refactor.el

@@ -1227,9 +1227,14 @@ See: https://github.com/clojure-emacs/clj-refactor.el/wiki/cljr-stop-referring"
           (paredit-backward)
           (clojure-delete-and-extract-sexp)
           (clojure-delete-and-extract-sexp)
-          (if (looking-back "\\w+ " 3)
-              (just-one-space 0)
-            (join-line))
+          (cond
+           ((looking-at-p "\\s-*[\\w:]+")
+            (just-one-space))
+
+           ((looking-back "\\w+ " 3)
+            (just-one-space 0))
+
+           (t (join-line)))
           (cljr--add-ns-prefix (or alias ns) symbols))))))
 
 (defun cljr--add-ns-prefix (ns symbols)

features/stop-refering.feature

@@ -89,3 +89,23 @@ Feature: Stop referring
     (+ (lib/a 1) (lib/b 2))
     (+ (A 1) (B 2))
     """
+
+  Scenario: With :as after the :refer
+    When I insert:
+    """
+    (ns cljr.core
+      (:require [my.lib :refer [a b] :as lib]))
+
+    (+ (a 1) (b 2))
+    (+ (A 1) (B 2))
+    """
+    And I place the cursor before "my.lib"
+    And I press "C-! sr"
+    Then I should see:
+    """
+    (ns cljr.core
+      (:require [my.lib :as lib]))
+
+    (+ (lib/a 1) (lib/b 2))
+    (+ (A 1) (B 2))
+    """