From 296e48861d2c08bbd3da2752b939f57c4cdad364 Mon Sep 17 00:00:00 2001 From: Brandon Bloom Date: Mon, 19 Nov 2012 15:34:07 -0800 Subject: [PATCH] CLJS-424: Use colon in keyword representation --- src/clj/cljs/compiler.clj | 2 +- src/cljs/cljs/core.cljs | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/src/clj/cljs/compiler.clj b/src/clj/cljs/compiler.clj index 978f3fe..65e4b1d 100644 --- a/src/clj/cljs/compiler.clj +++ b/src/clj/cljs/compiler.clj @@ -151,7 +151,7 @@ (emits \/ (.replaceAll (re-matcher #"/" pattern) "\\\\/") \/ flags))) (defmethod emit-constant clojure.lang.Keyword [x] - (emits \" "\\uFDD0" \' + (emits \" "\\uFDD0" \: (if (namespace x) (str (namespace x) "/") "") (name x) diff --git a/src/cljs/cljs/core.cljs b/src/cljs/cljs/core.cljs index 0a4f4ed..4c7ce13 100644 --- a/src/cljs/cljs/core.cljs +++ b/src/cljs/cljs/core.cljs @@ -1493,8 +1493,8 @@ reduces them without incurring seq initialization" "Returns a Keyword with the given namespace and name. Do not use : in the keyword strings, it will be added automatically." ([name] (cond (keyword? name) name - (symbol? name) (str* "\uFDD0" "'" (subs name 2)) - :else (str* "\uFDD0" "'" name))) + (symbol? name) (str* "\uFDD0" ":" (subs name 2)) + :else (str* "\uFDD0" ":" name))) ([ns name] (keyword (str* ns "/" name)))) -- 1.8.0