RR: fix read string or numbers

@royrutto How is this? It isn't a list that we are dealing with, so better not call the thing list, no?

(defn read-string-or-number
  [maybe-s]
  (if (instance? String maybe-s) (read-string maybe-s) maybe-s))