diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj
index ab5c532..2ba170e 100644
--- a/src/clj/clojure/core.clj
+++ b/src/clj/clojure/core.clj
@@ -5252,7 +5252,8 @@ (defmacro ns
   [name & references]
   (let [process-reference
         (fn [[kname & args]]
-          `(~(symbol "clojure.core" (clojure.core/name kname))
+          `(~(symbol (or (namespace kname) "clojure.core")
+                     (clojure.core/name kname))
              ~@(map #(list 'quote %) args)))
         docstring  (when (string? (first references)) (first references))
         references (if docstring (next references) references)

Generated by Phil Hagelberg using scpaste at Mon Nov 18 15:57:45 2013. PST. (original)