How about this? user=> (defn upper-first [s] (apply str (Character/toUpperCase (first s)) (rest s))) #'user/upper-first user=> (upper-first "aaaaa") "Aaaaa"
On Sun, Mar 8, 2009 at 3:39 PM, David Sletten <da...@bosatsu.net> wrote: > > Is there a function to capitalize the first letter of a string or a > better way than this idiotic code? > (apply str (map #(if (zero? %2) (Character/toUpperCase %1) %1) > "clojuriffic" (iterate inc 0))) > > Aloha, > David Sletten > > > > --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "Clojure" group. To post to this group, send email to clojure@googlegroups.com To unsubscribe from this group, send email to clojure+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/clojure?hl=en -~----------~----~----~----~------~----~------~--~---