From f1f6eb1140d57a07f9cc92becdb3cea59722a722 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Mon, 25 May 2015 23:55:00 +0200 Subject: [PATCH] ox-texinfo: Offer to open produced file from dispatcher * lisp/ox-texinfo.el (texinfo): Offer to open produced file from dispatcher. File is opened through `org-open-file' since texinfo back-end can output multiple formats. --- lisp/ox-texinfo.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ox-texinfo.el b/lisp/ox-texinfo.el index dd15ba04b..ecbd224bd 100644 --- a/lisp/ox-texinfo.el +++ b/lisp/ox-texinfo.el @@ -86,7 +86,11 @@ :menu-entry '(?i "Export to Texinfo" ((?t "As TEXI file" org-texinfo-export-to-texinfo) - (?i "As INFO file" org-texinfo-export-to-info))) + (?i "As INFO file" org-texinfo-export-to-info) + (?o "As INFO file and open" + (lambda (a s v b) + (if a (org-texinfo-export-to-info t s v b) + (org-open-file (org-texinfo-export-to-info nil s v b))))))) :options-alist '((:texinfo-filename "TEXINFO_FILENAME" nil nil t) (:texinfo-class "TEXINFO_CLASS" nil org-texinfo-default-class t) -- 2.11.4.GIT