diff options
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 7300fb78a88..da8ac55c01d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -764,6 +764,7 @@ If BACKWARD-ONLY is non-nil, only delete them before point." "Delete all spaces and tabs around point, leaving one space (or N spaces). If N is negative, deletes carriage return and linefeed characters as well." (interactive "*p") + (unless n (setq n 1)) (let ((orig-pos (point)) (skip-characters (if (< n 0) " \t\n\r" " \t")) (n (abs n))) |