# HG changeset patch # User Richard M. Stallman # Date 868689955 0 # Node ID 6897bd6a1c8db097898a3950332ba7170b5c4901 # Parent 17039a6e64cf27ff5f72e565c98544dc467c41f7 (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. diff -r 17039a6e64cf -r 6897bd6a1c8d src/cmds.c --- 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)