From 4dac047849bdb44b631f0b8d7013eb0e15a0f512 Mon Sep 17 00:00:00 2001 From: Philip Date: Thu, 13 Aug 2015 18:49:56 +0000 Subject: [PATCH 1/2] org.el: fix recursive regular expression backtracking * org.el (org-link-search): Avoid recursive regexp backtracking behaviour when following search links. TINYCHANGE --- lisp/org.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index a908d9e..7f46687 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -11128,18 +11128,18 @@ of matched result, with is either `dedicated' or `fuzzy'." "\\[[0-9]*\\(?:%\\|/[0-9]*\\)\\]" wspaceopt "\\)")) - (sep (concat "\\(?:" wspace "+\\|" cookie "+\\)")) + (sep (concat "\\(?:\\(?:" wspace "\\|" cookie "\\)+\\)")) (re (concat org-outline-regexp-bol "\\(?:" org-todo-regexp "[ \t]+\\)?" "\\(?:\\[#.\\][ \t]+\\)?" "\\(?:" org-comment-string "[ \t]+\\)?" - sep "*" + sep "?" (let ((title (mapconcat #'regexp-quote words - (concat sep "+")))) + sep))) (if starred (substring title 1) title)) - sep "*" + sep "?" (org-re "\\(?:[ \t]+:[[:alnum:address@hidden:]+:\\)?") "[ \t]*$"))) (goto-char (point-min)) -- 2.5.0