Commit a168699d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(delete-horizontal-space): Use prefix arg.

parent cc86b31b
......@@ -707,7 +707,7 @@ Leave one space or none, according to the context."
(defun delete-horizontal-space (&optional backward-only)
"Delete all spaces and tabs around point.
If BACKWARD-ONLY is non-nil, only delete spaces before point."
(interactive "*")
(interactive "*P")
(let ((orig-pos (point)))
(delete-region
(if backward-only
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment