aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1997-07-12 06:45:55 +0000
committerRichard M. Stallman1997-07-12 06:45:55 +0000
commitcac557491c0da35614534e3cb9623888f8f61b97 (patch)
tree5d97f51a1a7f8302be21fc53f5c6f3d737f94a4f /src
parent5d632ccf24ce7fa44cd3ff8230bcc20dc4623506 (diff)
downloademacs-cac557491c0da35614534e3cb9623888f8f61b97.tar.gz
emacs-cac557491c0da35614534e3cb9623888f8f61b97.zip
(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.
Diffstat (limited to 'src')
-rw-r--r--src/cmds.c7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/cmds.c b/src/cmds.c
index 00a6e7687f8..68a6726dbb1 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -1,5 +1,5 @@
1/* Simple built-in editing commands. 1/* Simple built-in editing commands.
2 Copyright (C) 1985, 93, 94, 95, 1996 Free Software Foundation, Inc. 2 Copyright (C) 1985, 93, 94, 95, 96, 1997 Free Software Foundation, Inc.
3 3
4This file is part of GNU Emacs. 4This file is part of GNU Emacs.
5 5
@@ -285,7 +285,7 @@ N was explicitly specified.")
285 285
286 value = Fdelete_char (make_number (-XINT (n)), killflag); 286 value = Fdelete_char (make_number (-XINT (n)), killflag);
287 i = column - current_column (); 287 i = column - current_column ();
288 Finsert_char (make_number (' '), i); 288 Finsert_char (make_number (' '), make_number (i), Qnil);
289 SET_PT (PT - i); 289 SET_PT (PT - i);
290 } 290 }
291 else 291 else
@@ -419,7 +419,8 @@ internal_self_insert (c, noautofill)
419 if the TARGET_CLM is middle of multi-column 419 if the TARGET_CLM is middle of multi-column
420 character. In that case, the new point is set after 420 character. In that case, the new point is set after
421 that character. */ 421 that character. */
422 int actual_clm = XFASTINT (Fmove_to_column (target_clm)); 422 int actual_clm
423 = XFASTINT (Fmove_to_column (make_number (target_clm), Qnil));
423 424
424 del_range (pos, PT); 425 del_range (pos, PT);
425 if (actual_clm > target_clm) 426 if (actual_clm > target_clm)