diff options
| author | Richard M. Stallman | 2005-01-17 23:48:10 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-01-17 23:48:10 +0000 |
| commit | dd60a465fbc6039e025165624147f5ef993f42d1 (patch) | |
| tree | 34f3717a70e97163bb6a716dd91ec4905c623c8d | |
| parent | 67476fca4fbf43b7045df65c91ffe860b99124e2 (diff) | |
| download | emacs-dd60a465fbc6039e025165624147f5ef993f42d1.tar.gz emacs-dd60a465fbc6039e025165624147f5ef993f42d1.zip | |
(backward-kill-sexp, kill-sexp): Doc fixes.
| -rw-r--r-- | lisp/emacs-lisp/lisp.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index 69938255112..d19eace5824 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el | |||
| @@ -140,18 +140,18 @@ A negative argument means move backward but still to a less deep spot." | |||
| 140 | (setq arg (- arg inc))))) | 140 | (setq arg (- arg inc))))) |
| 141 | 141 | ||
| 142 | (defun kill-sexp (&optional arg) | 142 | (defun kill-sexp (&optional arg) |
| 143 | "Kill the sexp (balanced expression) following the cursor. | 143 | "Kill the sexp (balanced expression) following point. |
| 144 | With ARG, kill that many sexps after the cursor. | 144 | With ARG, kill that many sexps after point. |
| 145 | Negative arg -N means kill N sexps before the cursor." | 145 | Negative arg -N means kill N sexps before point." |
| 146 | (interactive "p") | 146 | (interactive "p") |
| 147 | (let ((opoint (point))) | 147 | (let ((opoint (point))) |
| 148 | (forward-sexp (or arg 1)) | 148 | (forward-sexp (or arg 1)) |
| 149 | (kill-region opoint (point)))) | 149 | (kill-region opoint (point)))) |
| 150 | 150 | ||
| 151 | (defun backward-kill-sexp (&optional arg) | 151 | (defun backward-kill-sexp (&optional arg) |
| 152 | "Kill the sexp (balanced expression) preceding the cursor. | 152 | "Kill the sexp (balanced expression) preceding point. |
| 153 | With ARG, kill that many sexps before the cursor. | 153 | With ARG, kill that many sexps before point. |
| 154 | Negative arg -N means kill N sexps after the cursor." | 154 | Negative arg -N means kill N sexps after point." |
| 155 | (interactive "p") | 155 | (interactive "p") |
| 156 | (kill-sexp (- (or arg 1)))) | 156 | (kill-sexp (- (or arg 1)))) |
| 157 | 157 | ||