diff options
| author | Richard M. Stallman | 2006-12-17 22:14:48 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2006-12-17 22:14:48 +0000 |
| commit | a168699d171a658d539ee20082effdfb0530f4bb (patch) | |
| tree | f3c7e82c06647972ad4ee65051cf8af37acc4d78 | |
| parent | cc86b31bb97f039a893d2bd67a77758391f77565 (diff) | |
| download | emacs-a168699d171a658d539ee20082effdfb0530f4bb.tar.gz emacs-a168699d171a658d539ee20082effdfb0530f4bb.zip | |
(delete-horizontal-space): Use prefix arg.
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index aa44fa382ba..2043a20cf9b 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -707,7 +707,7 @@ Leave one space or none, according to the context." | |||
| 707 | (defun delete-horizontal-space (&optional backward-only) | 707 | (defun delete-horizontal-space (&optional backward-only) |
| 708 | "Delete all spaces and tabs around point. | 708 | "Delete all spaces and tabs around point. |
| 709 | If BACKWARD-ONLY is non-nil, only delete spaces before point." | 709 | If BACKWARD-ONLY is non-nil, only delete spaces before point." |
| 710 | (interactive "*") | 710 | (interactive "*P") |
| 711 | (let ((orig-pos (point))) | 711 | (let ((orig-pos (point))) |
| 712 | (delete-region | 712 | (delete-region |
| 713 | (if backward-only | 713 | (if backward-only |