Canna for GNU Emacs 31

jrmさんからほぼ年一のおしらせが届いて、今回はjrmさんが先にパッチを作ってくださった。

30.0.91用のパッチです。30.1でもおそらくそのまま行けます。