Add org-tree-slide-exit-at-next-last-slide and -before-hook

[hidsh]

Hi !

This package is marvelous!
However I'd like to exit the slideshow at arriving to last slide. Then my trivial ideal will be realized perfectly like below if org-tree-mode-exit-hook is added to this package.

https://vimeo.com/490095476

(defun enter-the-prezn ()
  (setq org-tree-slide-exit-at-next-last-slide t)
(add-hook 'org-tree-slide-play-hook #'enter-the-prezn)

(defun sayonara ()
  (lexical-let ((animate-n-steps 60)
                (vpos 10))
    (animate-string "Thank you for watching!" vpos))
  (sit-for 3))
(add-hook 'org-tree-slide-before-exit-hook #'sayonara)

すみません。英語しんどくなってきたので日本語使わせてください ^_^;

プレゼンが最後まで行ったらそのままC->を押して抜けるようにしたかったのと、抜けるとき用のフックが欲しかったので足してみました。

変なところに足しててすみません。（org-tree-slide-stop-hookでやろうとしたのですが、「中断」的なとき用の感じがしたので新たに足してみました。）

設計思想と違う場合はお知らせください。