# HG changeset patch # User Richard M. Stallman # Date 1106005690 0 # Node ID 99bf07f4903146b4cdc85a20acb628600f10d687 # Parent 73b89f6377fcedbce1ce54717bbd35f6338e18c1 (backward-kill-sexp, kill-sexp): Doc fixes. diff -r 73b89f6377fc -r 99bf07f49031 lisp/emacs-lisp/lisp.el --- a/lisp/emacs-lisp/lisp.el Mon Jan 17 21:24:46 2005 +0000 +++ b/lisp/emacs-lisp/lisp.el Mon Jan 17 23:48:10 2005 +0000 @@ -140,18 +140,18 @@ (setq arg (- arg inc))))) (defun kill-sexp (&optional arg) - "Kill the sexp (balanced expression) following the cursor. -With ARG, kill that many sexps after the cursor. -Negative arg -N means kill N sexps before the cursor." + "Kill the sexp (balanced expression) following point. +With ARG, kill that many sexps after point. +Negative arg -N means kill N sexps before point." (interactive "p") (let ((opoint (point))) (forward-sexp (or arg 1)) (kill-region opoint (point)))) (defun backward-kill-sexp (&optional arg) - "Kill the sexp (balanced expression) preceding the cursor. -With ARG, kill that many sexps before the cursor. -Negative arg -N means kill N sexps after the cursor." + "Kill the sexp (balanced expression) preceding point. +With ARG, kill that many sexps before point. +Negative arg -N means kill N sexps after point." (interactive "p") (kill-sexp (- (or arg 1))))