I would also like to have a solution to this.
For now, I arrange my let bindings as follows:
--8<---------------cut here---------------start------------->8---
(let ((temp-buffer (generate-new-buffer "temp"))
from to)
body
body)
--8<---------------cut here---------------end--------------->8---
--
Kaushal Modi