diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-11-10 09:00:45 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-11-10 09:00:45 +0100 |
| commit | 88ef9f26de09a697f0dea05fdabff978326198e5 (patch) | |
| tree | 96c21c824b414a175a767cb88e080dd39b722274 | |
| parent | f5c2659bb86f3f9744c897b6f8f94825594e24a8 (diff) | |
| download | org-mode-88ef9f26de09a697f0dea05fdabff978326198e5.tar.gz | |
ox-texinfo: Allow quotes around value in TEXINFO_FILENAME keyword
* lisp/ox-texinfo.el (org-texinfo-template): Allow quotes around value
in TEXINFO_FILENAME keyword.
This is consistent with usual Org behavior: file names can optionally
be enclosed within quotes.
| -rw-r--r-- | lisp/ox-texinfo.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ox-texinfo.el b/lisp/ox-texinfo.el index 825f95f..f5c4f9f 100644 --- a/lisp/ox-texinfo.el +++ b/lisp/ox-texinfo.el @@ -576,7 +576,7 @@ holding export options." (concat "\\input texinfo @c -*- texinfo -*-\n" "@c %**start of header\n" - (let ((file (or (plist-get info :texinfo-filename) + (let ((file (or (org-strip-quotes (plist-get info :texinfo-filename)) (let ((f (plist-get info :output-file))) (and f (concat (file-name-sans-extension f) ".info")))))) (and file (format "@setfilename %s\n" file))) |