org-export: Make sure that window displaying UI is tall enough

* contrib/lisp/org-export.el (org-export-dispatch-ui): Make sure that
  window displaying UI is tall enough. This fixes a bug where only
  a part of the menu was displayed.
This commit is contained in:
Nicolas Goaziou 2012-10-21 14:54:23 +02:00
parent 09e3a24a2f
commit 468d860528
1 changed files with 3 additions and 0 deletions

View File

@ -4592,7 +4592,10 @@ back to standard interface."
(delete-other-windows)
(org-switch-to-buffer-other-window
(get-buffer-create "*Org Export Dispatcher*"))
(org-fit-window-to-buffer)
(setq cursor-type nil))
;; At this point, the buffer containing the menu exists and is
;; visible in the current window. So, refresh it.
(with-current-buffer "*Org Export Dispatcher*"
(erase-buffer)
(insert help))