Bastien <[email protected]> writes:
> Carsten proposed a patch that I adapted a little bit and pushed to the
> maint branch. We now throw an error saying that dragging inline tasks
> is not supported.
Isn't it easy to implement using org-element-swap-A-B?
Something like
(defun org-element-swap-at-point (&optional down)
(when-let* ((el-cur (org-element-at-point))
(el-other (org-with-point-at
(if down
(org-element-property :end el-cur)
(1- (org-element-property :begin el-cur)))
(org-element-at-point))))
(unless (equal el-cur el-other)
(org-element-swap-A-B el-cur el-other))))
Best,
Ihor
