Sfoglia il codice sorgente

org-list: tiny code change

* lisp/org-list.el (org-list-struct-apply-struct): don't
  use (copy-marker (point)) instead of (point-marker).
Nicolas Goaziou 13 anni fa
parent
commit
08ca5be491
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      lisp/org-list.el

+ 1 - 1
lisp/org-list.el

@@ -1770,7 +1770,7 @@ the structure to be applied.  The function will only modify parts
 of the list which have changed.
 
 Initial position of cursor is restored after the changes."
-  (let* ((origin (copy-marker (point)))
+  (let* ((origin (point-maker))
 	 (inlinetask-re (and (featurep 'org-inlinetask)
 			     (org-inlinetask-outline-regexp)))
 	 (item-re (org-item-re))