From a9ee43a1248f1daabb4aedb793314a223b2d4ba7 Mon Sep 17 00:00:00 2001 From: TEC Date: Mon, 23 Jan 2023 01:09:34 +0800 Subject: [PATCH] ox: Fix parsing of example #+includes * lisp/ox.el (org-export-parse-include-value): Since the example environment regexp does not contain a capture group, we can not assume we can call `replace-match' on the first capture group. Before doing so, check that the capture group indeed exists. --- lisp/ox.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/ox.el b/lisp/ox.el index 759bd7875..6fd72a223 100644 --- a/lisp/ox.el +++ b/lisp/ox.el @@ -3420,7 +3420,8 @@ provided as the :unmatched parameter." :org-include-induced-level)))) (args (and (eq env 'literal) (prog1 (match-string 1 value) - (setq value (replace-match "" nil nil value 1))))) + (when (match-string 1 value) + (setq value (replace-match "" nil nil value 1)))))) (block (and (or (string-match "\"\\(\\S-+\\)\"" value) (string-match "\\<\\(\\S-+\\)\\>" value)) (or (= (match-beginning 0) 0)