Prechádzať zdrojové kódy

lisp/org.el: Indent list items in drawers correctly

* lisp/org.el (org-fixup-indentation): Indent list items in drawers
correctly, by respecting existing relative indentation.
Bastien Guerry 4 rokov pred
rodič
commit
43f6ced0da
1 zmenil súbory, kde vykonal 3 pridanie a 1 odobranie
  1. 3 1
      lisp/org.el

+ 3 - 1
lisp/org.el

@@ -7393,7 +7393,9 @@ Assume point is at a heading or an inlinetask beginning."
 	   (col (+ (current-indentation) diff)))
        (when (wholenump col)
 	 (while (< (point) end-marker)
-	   (indent-line-to col)
+           (if (natnump diff)
+	       (insert (make-string diff 32))
+             (delete-char (abs diff)))
 	   (forward-line)))))
    (catch 'no-shift
      (when (or (zerop diff) (not (eq org-adapt-indentation t)))