(defun my/kill-bbdb-window ()
  "Kill the BBDB window while reading email"
  (interactive)
  (with-current-buffer-window (get-buffer bbdb-buffer-name) nil nil
    (quit-window nil (get-buffer bbdb-buffer-name))))