Ignore line breaks when removing duplicates links
This commit is contained in:
@@ -440,8 +440,14 @@ is a plist used as a communication channel."
|
|||||||
;; Update SEEN links along the way.
|
;; Update SEEN links along the way.
|
||||||
(lambda (link)
|
(lambda (link)
|
||||||
(let ((footprint
|
(let ((footprint
|
||||||
|
;; Normalize description in footprints.
|
||||||
(cons (org-element-property :raw-link link)
|
(cons (org-element-property :raw-link link)
|
||||||
(org-element-contents link))))
|
(let ((contents (org-element-contents link)))
|
||||||
|
(and contents
|
||||||
|
(replace-regexp-in-string
|
||||||
|
"[ \r\t\n]+" " "
|
||||||
|
(org-trim
|
||||||
|
(org-element-interpret-data contents))))))))
|
||||||
;; Ignore LINK if it hasn't been translated already.
|
;; Ignore LINK if it hasn't been translated already.
|
||||||
;; It can happen if it is located in an affiliated
|
;; It can happen if it is located in an affiliated
|
||||||
;; keyword that was ignored.
|
;; keyword that was ignored.
|
||||||
|
|||||||
Reference in New Issue
Block a user