diff --git a/lisp/ChangeLog b/lisp/ChangeLog index be92d73ff..2d0e82ba1 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,7 @@ * org-exp.el (org-export-format-source-code-or-example): Fix bug that did not enumerate first line. + (org-export-mark-radio-links): Skip matches in links. 2009-07-18 Carsten Dominik diff --git a/lisp/org-exp.el b/lisp/org-exp.el index cfcce2621..57d41db59 100644 --- a/lisp/org-exp.el +++ b/lisp/org-exp.el @@ -1792,8 +1792,12 @@ When it is nil, all comments will be removed." (goto-char (point-min)) (when re-radio (while (re-search-forward re-radio nil t) - (org-if-unprotected - (replace-match "\\1[[\\2]]")))))) + (unless + (save-match-data + (or (org-in-regexp org-bracket-link-regexp) + (org-in-regexp org-plain-link-re))) + (org-if-unprotected + (replace-match "\\1[[\\2]]"))))))) (defun org-export-remove-special-table-lines () "Remove tables lines that are used for internal purposes."