- "Execute BODY, then select the window that was selected before BODY."
- `(let ((save-selected-window-window (selected-window)))
+ "Execute BODY, then select the window that was selected before BODY.
+The value returned is the value of the last form in BODY."
+ (let ((old-window (gensym "ssw")))
+ `(let ((,old-window (selected-window)))