It's doesn't cast doubt on the examples at all, your code is less generic:

  (defn has-uppercase? [string]
    (some #(Character/isUpperCase %) string))

This code can deal with any sequence of characters: String, Array, PersistentList, PersistentVector, Cons, LazySequence, etc. Your example only deals with String.