Re: Randomly capitalise letters

[Burton Samograd]

Stefan Monnier <monnier@iro.umontreal.ca> writes:

>>     (while (not (= start end))
>>       (if (= 0 (random downcase-factor))
>>           (upcase-region start (1+ start)))
>>       (incf start))))
>
> You could speed it up with something like
>
>     (while (< start end)
>       (upcase-region start (1+ start))
>       (incf start (+ 1 (random downcase-factor))))

Good idea in case you want to random-case 'War and Peace' :)

--
Burton Samograd