diff options
| -rw-r--r-- | src/callint.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/callint.c b/src/callint.c index ae10e64e1de..741f61d068b 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -721,10 +721,10 @@ If KEYS is omitted or nil, the return value of `this-command-keys' is used. */) | |||
| 721 | do | 721 | do |
| 722 | { | 722 | { |
| 723 | Lisp_Object tem; | 723 | Lisp_Object tem; |
| 724 | if (! first) | 724 | if (! first) |
| 725 | { | 725 | { |
| 726 | message ("Please enter a number."); | 726 | message ("Please enter a number."); |
| 727 | sit_for (1, 0, 0, 0, 0); | 727 | sit_for (make_number (1), 0, 0); |
| 728 | } | 728 | } |
| 729 | first = 0; | 729 | first = 0; |
| 730 | 730 | ||