Quellcode durchsuchen

Paste subtree above target headline if point is at bol

* org.el (org-paste-subtree): Paste subtree above target headline if
point is at bol.

Capture and refile depend on this buggy behavior of org-past-subtree.
David Maus vor 13 Jahren
Ursprung
Commit
e5199c4095
1 geänderte Dateien mit 1 neuen und 1 gelöschten Zeilen
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -7568,7 +7568,7 @@ the inserted text when done."
      (if force-level
 	 (delete-region (point-at-bol) (point)))
      ;; Paste
-     (beginning-of-line (if (org-at-heading-p) 2 1))
+     (beginning-of-line (if (bolp) 2 1))
      (unless for-yank (org-back-over-empty-lines))
      (setq beg (point))
      (and (fboundp 'org-id-paste-tracker) (org-id-paste-tracker txt))