(add-hook 'ein:ipynb-mode-hook
          (lambda ()
            (cl-letf (((symbol-function 'read-directory-name)
                       (lambda (_prompt dir &rest _args) dir)))
              (ein:process-open-notebook
              (mapc 'switch-to-buffer
                     (cl-remove-if-not (lambda (b)
                      (and
                       (string-match-p "ein" (buffer-name b))
                       (string-match-p "ipynb" (buffer-name b))))
                    (buffer-list)))
              (delete-other-windows))
                )))