Handle bare dot

brandonbloom · May 31, 2015 · fb1452a · fb1452a
1 parent 09574bd
commit fb1452a
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/src/backtick.clj b/src/backtick.clj
@@ -83,7 +83,7 @@
   (let [ns (namespace sym)
         nm (name sym)]
     (if (nil? ns)
-      (if-let [[_ ctor-name] (re-find #"(.*)\.$" nm)]
+      (if-let [[_ ctor-name] (re-find #"(.+)\.$" nm)]
         (symbol nil (-> (symbol nil ctor-name)
                       resolve-symbol
                       name

diff --git a/test/backtick_test.clj b/test/backtick_test.clj
@@ -50,6 +50,7 @@
               unqualified
               fully/qualified
               .method
+              .
               inc
               backtick.test/inc
               quote])
@@ -60,7 +61,7 @@
              unqualified
              fully/qualified
              .method
+             .
              inc
              backtick.test/inc
              quote]))))
-