(with-selected-window notmuch-pick-message-window
(setq current-prefix-arg '(4))
(setq buffer (notmuch-show id nil nil nil)))
(with-selected-window notmuch-pick-message-window
(setq current-prefix-arg '(4))
(setq buffer (notmuch-show id nil nil nil)))