mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-27 16:32:57 +00:00
Fix bug when exporting links with attributes.
This commit is contained in:
parent
5ea6de59a1
commit
0be85cda60
|
@ -64,10 +64,6 @@
|
||||||
|
|
||||||
: [[./img/a.jpg{{alt="This is image A" title="Image with no action"}}] ]
|
: [[./img/a.jpg{{alt="This is image A" title="Image with no action"}}] ]
|
||||||
|
|
||||||
**** TODO Fix link export in examples.
|
|
||||||
For some reason these are processed even though they are in
|
|
||||||
an exmple region.
|
|
||||||
|
|
||||||
*** A way to compare times during a property search
|
*** A way to compare times during a property search
|
||||||
If the comparison value in a property search is a string that
|
If the comparison value in a property search is a string that
|
||||||
is enclosed in angular brackets, a time comparison will be
|
is enclosed in angular brackets, a time comparison will be
|
||||||
|
|
|
@ -1716,6 +1716,7 @@ When it is nil, all comments will be removed."
|
||||||
(replace-match s t t))))
|
(replace-match s t t))))
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
(while (re-search-forward org-bracket-link-regexp nil t)
|
(while (re-search-forward org-bracket-link-regexp nil t)
|
||||||
|
(goto-char (1- (match-end 0)))
|
||||||
(org-if-unprotected
|
(org-if-unprotected
|
||||||
(let* ((xx (save-match-data
|
(let* ((xx (save-match-data
|
||||||
(org-link-expand-abbrev (match-string 1))))
|
(org-link-expand-abbrev (match-string 1))))
|
||||||
|
|
Loading…
Reference in a new issue