From de6201b19c78c9f13f857f43a8f097e56d75fa0f Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 28 Dec 2012 11:03:58 +0100 Subject: [PATCH] org.el (org-insert-link): Fix bug when inserting links to headlines containing the ">" character MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * org.el (org-insert-link): Fix bug when inserting links to headlines containing the ">" character. Thanks to William Léchelle for reporting this. --- lisp/org.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 0fabaf600..837d49b59 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9317,10 +9317,11 @@ Use TAB to complete link prefixes, then RET for type-specific completion support ;; URL-like link, normalize the use of angular brackets. (setq link (org-remove-angle-brackets link))) - ;; Check if we are linking to the current file with a search option - ;; If yes, simplify the link by using only the search option. + ;; Check if we are linking to the current file with a search + ;; option If yes, simplify the link by using only the search + ;; option. (when (and buffer-file-name - (string-match "^file:\\(.+?\\)::\\([^>]+\\)" link)) + (string-match "^file:\\(.+?\\)::\\(.+\\)" link)) (let* ((path (match-string 1 link)) (case-fold-search nil) (search (match-string 2 link)))