diff options
| author | Richard M. Stallman <[email protected]> | 1992-09-11 23:31:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1992-09-11 23:31:02 +0000 |
| commit | 95be70edc1b42b4455ecbef42fe054776f13754e (patch) | |
| tree | 3e06579bc7f2bf74c4deceb880d06f16535df71a /src | |
| parent | ce6e5d0b572ab298101d6648fec213155bcbb7d3 (diff) | |
(Fx_track_pointer): Pass new args to read_char.
(Fx_select_region, Fx_horizontal_line): Likewise.
Diffstat (limited to 'src')
| -rw-r--r-- | src/xfns.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/xfns.c b/src/xfns.c index d6db6e6874..d12f303872 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -3511,7 +3511,7 @@ DEFUN ("x-select-region", Fx_select_region, Sx_select_region, 1, 1, "e", while (1) { - obj = read_char (-1); + obj = read_char (-1, 0, 0, Qnil, 0); if (XTYPE (obj) != Lisp_Cons) break; @@ -3643,7 +3643,7 @@ DEFUN ("x-horizontal-line", Fx_horizontal_line, Sx_horizontal_line, 1, 1, "e", do { - obj = read_char (-1); + obj = read_char (-1, 0, 0, Qnil, 0); if ((XTYPE (obj) != Lisp_Cons) || (! EQ (Fcar (Fcdr (Fcdr (obj))), Qvertical_scroll_bar)) @@ -3859,7 +3859,7 @@ DEFUN ("x-track-pointer", Fx_track_pointer, Sx_track_pointer, 1, 1, "e", XFlush (x_current_display); UNBLOCK_INPUT; - obj = read_char (-1); + obj = read_char (-1, 0, 0, Qnil, 0); BLOCK_INPUT; } while (XTYPE (obj) == Lisp_Cons /* Mouse event */ |