mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

org-list: fix insertion of item with indent-tabs-mode is non-nil 

* lisp/org-list.el (org-list-insert-item): when computing size of item
  being inserted, function has to take into account that indentation
  may not only be made of spaces.
This commit is contained in:
Nicolas Goaziou 2011-02-25 20:48:27 +01:00
parent 97de64cfc3
commit 7b211c86e7
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/org-list.el
View File

@ -1172,7 +1172,10 @@ This function modifies STRUCT."
;; BEFOREP and SPLIT-LINE-P. The difference of size
;; between what was cut and what was inserted in buffer
;; is stored in SIZE-OFFSET.
(ind (org-list-get-ind item struct))
(ind (let ((ind-ref (org-list-get-ind item struct)))
(if (not indent-tabs-mode)
ind-ref
(+ (/ ind-ref tab-width) (mod ind-ref tab-width)))))
(bullet (org-list-bullet-string (org-list-get-bullet item struct)))
(box (when checkbox "[ ]"))
(text-cut