(qualified-keyword? x)
Return true if x is a keyword with a namespace
(defn qualified-keyword? [x] (boolean (and (keyword? x) (namespace x) true)))