(defun my-upcase-word ()
(interactive)
(backward-word)
(upcase-word)
(insert " "))

この関数、 upcase-word のところでエラーが出て
しまって動きません。
error: (wrong-number-of-arguments #<subr upcase-word> 0)
この手順通りに手動でやるとちゃんと動くんですが。
upcase-word を調べてみたところ、別に引数は必須
じゃないみたいです。何がいけないんでしょうか。