strip metadata from syms used in keywords, fixes #693

clojure · Dec 17, 2010 · 1109a8b · 1109a8b
1 parent 2879523
commit 1109a8b
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/jvm/clojure/lang/Keyword.java b/src/jvm/clojure/lang/Keyword.java
@@ -27,6 +27,8 @@ public final class Keyword implements IFn, Comparable, Named, Serializable {
 final int hash;
 
 public static Keyword intern(Symbol sym){
+	if(sym.meta() != null)
+		sym = (Symbol) sym.withMeta(null);
 	Util.clearCache(rq, table);
 	Keyword k = new Keyword(sym);
 	SoftReference<Keyword> existingRef = table.putIfAbsent(sym, new SoftReference<Keyword>(k,rq));