From 9ae750f084864f8a7c4bf9a9ee7d0cd9e7014648 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 2 Apr 2008 20:15:21 +0000 Subject: [PATCH] (Fforward_char, Fbackward_char, Fforward_line) (Fbeginning_of_line, Fend_of_line): Add ^ interactive spec. --- src/cmds.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/cmds.c b/src/cmds.c index 6d09556f32c..ed37603eb45 100644 --- a/src/cmds.c +++ b/src/cmds.c @@ -56,7 +56,7 @@ DEFUN ("forward-point", Fforward_point, Sforward_point, 1, 1, 0, return make_number (PT + XINT (n)); } -DEFUN ("forward-char", Fforward_char, Sforward_char, 0, 1, "p", +DEFUN ("forward-char", Fforward_char, Sforward_char, 0, 1, "^p", doc: /* Move point right N characters (left if N is negative). On reaching end of buffer, stop and signal error. */) (n) @@ -92,7 +92,7 @@ On reaching end of buffer, stop and signal error. */) return Qnil; } -DEFUN ("backward-char", Fbackward_char, Sbackward_char, 0, 1, "p", +DEFUN ("backward-char", Fbackward_char, Sbackward_char, 0, 1, "^p", doc: /* Move point left N characters (right if N is negative). On attempt to pass beginning or end of buffer, stop and signal error. */) (n) @@ -107,7 +107,7 @@ On attempt to pass beginning or end of buffer, stop and signal error. */) return Fforward_char (n); } -DEFUN ("forward-line", Fforward_line, Sforward_line, 0, 1, "p", +DEFUN ("forward-line", Fforward_line, Sforward_line, 0, 1, "^p", doc: /* Move N lines forward (backward if N is negative). Precisely, if point is on line I, move to the start of line I + N. If there isn't room, go as far as possible (no error). @@ -153,7 +153,7 @@ With positive N, a non-empty line at the end counts as one line return make_number (count <= 0 ? - shortage : shortage); } -DEFUN ("beginning-of-line", Fbeginning_of_line, Sbeginning_of_line, 0, 1, "p", +DEFUN ("beginning-of-line", Fbeginning_of_line, Sbeginning_of_line, 0, 1, "^p", doc: /* Move point to beginning of current line. With argument N not nil or 1, move forward N - 1 lines first. If point reaches the beginning or end of buffer, it stops there. @@ -178,7 +178,7 @@ instead. For instance, `(forward-line 0)' does the same thing as return Qnil; } -DEFUN ("end-of-line", Fend_of_line, Send_of_line, 0, 1, "p", +DEFUN ("end-of-line", Fend_of_line, Send_of_line, 0, 1, "^p", doc: /* Move point to end of current line. With argument N not nil or 1, move forward N - 1 lines first. If point reaches the beginning or end of buffer, it stops there. -- 2.39.5