contrib/lisp/org-contacts.el: Delete trailing whitespaces
This commit is contained in:
parent
ec623af862
commit
127bffa9e9
|
@ -253,11 +253,11 @@ This function returns a list whose contains:
|
|||
(len2 (length s2))
|
||||
(start2 (or start2 0))
|
||||
(end2 (or end2 len2))
|
||||
|
||||
|
||||
(new-start (car (org-contacts-compare-strings
|
||||
(substring (org-reverse-string s1) (- len1 start1)) nil nil
|
||||
(substring (org-reverse-string s2) (- len2 start2)) nil nil)))
|
||||
|
||||
|
||||
(new-end (+ end1 (car (org-contacts-compare-strings
|
||||
(substring s1 end1) nil nil
|
||||
(substring s2 end2) nil nil)))))
|
||||
|
|
Loading…
Reference in New Issue