Ihor Radchenko <[email protected]> writes: > 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?
Well, probably, I didn't try this. > 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)))) Can you make a patch for this? -- Bastien
