Jelajahi Sumber

org.el: Use `kill-visual-line' in `visual-line-mode'.

* org.el (org-kill-line): Use `kill-visual-line' in
 `visual-line-mode'.

TINYCHANGE
François Pinard 13 tahun lalu
induk
melakukan
f29e6edb90
1 mengubah file dengan 2 tambahan dan 1 penghapusan
  1. 2 1
      lisp/org.el

+ 2 - 1
lisp/org.el

@@ -20491,7 +20491,8 @@ depending on context."
 	(if (or (eq org-ctrl-k-protect-subtree 'error)
 		(not (y-or-n-p "Kill hidden subtree along with headline? ")))
 	    (error "C-k aborted - would kill hidden subtree")))
-    (call-interactively 'kill-line))
+    (call-interactively
+     (if visual-line-mode 'kill-visual-line 'kill-line)))
    ((looking-at (org-re ".*?\\S-\\([ \t]+\\(:[[:alnum:]_@#%:]+:\\)\\)[ \t]*$"))
     (kill-region (point) (match-beginning 1))
     (org-set-tags nil t))