Mercurial > emacs
changeset 18748:6897bd6a1c8d
(Fdelete_backward_char): Convert Finsert_char argument to
Lisp_Integer and add missing argument.
(internal_self_insert): Convert Fmove_to_column argument to
Lisp_Integer and add missing argument.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 12 Jul 1997 06:45:55 +0000 |
parents | 17039a6e64cf |
children | d961aeafceba |
files | src/cmds.c |
diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/cmds.c Sat Jul 12 06:45:09 1997 +0000 +++ b/src/cmds.c Sat Jul 12 06:45:55 1997 +0000 @@ -1,5 +1,5 @@ /* Simple built-in editing commands. - Copyright (C) 1985, 93, 94, 95, 1996 Free Software Foundation, Inc. + Copyright (C) 1985, 93, 94, 95, 96, 1997 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -285,7 +285,7 @@ value = Fdelete_char (make_number (-XINT (n)), killflag); i = column - current_column (); - Finsert_char (make_number (' '), i); + Finsert_char (make_number (' '), make_number (i), Qnil); SET_PT (PT - i); } else @@ -419,7 +419,8 @@ if the TARGET_CLM is middle of multi-column character. In that case, the new point is set after that character. */ - int actual_clm = XFASTINT (Fmove_to_column (target_clm)); + int actual_clm + = XFASTINT (Fmove_to_column (make_number (target_clm), Qnil)); del_range (pos, PT); if (actual_clm > target_clm)