[AUCTeX] Replace \[ ... \] with \begin{equation} ... \end{equation}

[Evgeny Makarov]

Hello,

I am wondering if there is a fast way to replace \[ ... \] with 
\begin{equation} ... \end{equation}. From looking at the code of 
LaTeX-modify-environment, it seems that it is hard-coded to look for 
"begin" and "end"...

Thank you,
Evgeny