bug#16190: 23.4; M-x captialize-word works incorrectly

[Kevin Rodgers]

On 12/23/13 11:59 AM, Josh wrote:
> On Mon, Dec 23, 2013 at 8:12 AM, Eli Zaretskii<eliz@gnu.org>  wrote:
> > If you want a function that capitalizes the word at point after
> > looking back for its beginning, you need to code that using
> > thing-at-point or some such.
>
> When point is not already at the start of the word, `capitalize-word'
> can already do this pretty easily via `M-- M-c'.

So for the OP:

(defun capitalize-word-at-point ()
  "Capitalize the word at point (i.e. around point), without moving point."
  (interactive)
  (capitalize-word -1))

(global-set-key "\M-c" 'capitalize-word-at-point) ; was capitalize-word

--
Kevin Rodgers
Denver, Colorado, USA