diff options
| author | Karoly Lorentey | 2006-07-29 09:59:12 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2006-07-29 09:59:12 +0000 |
| commit | 251bc578cc636223d618d06cf2a2bb7d07db9cce (patch) | |
| tree | 58e1c6b0a35bb4a77e6cb77876e4bc6a9d3f2ab2 /src/callint.c | |
| parent | 99715bbc447eb633e45ffa23b87284771ce3ac74 (diff) | |
| parent | 0ed0527cb02180a50f6744086ce3a487740c73e4 (diff) | |
| download | emacs-251bc578cc636223d618d06cf2a2bb7d07db9cce.tar.gz emacs-251bc578cc636223d618d06cf2a2bb7d07db9cce.zip | |
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-351
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-352
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-353
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-354
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-355
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-356
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-357
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-358
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-359
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-360
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-361
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-362
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-363
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-364
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-365
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-366
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-367
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-368
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-369
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-370
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-115
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-116
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-117
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-118
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-119
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-120
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-573
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/callint.c b/src/callint.c index afb576cf5f6..e48168db164 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -174,7 +174,7 @@ check_mark (for_region) | |||
| 174 | : "The mark is not set now"); | 174 | : "The mark is not set now"); |
| 175 | if (!NILP (Vtransient_mark_mode) && NILP (Vmark_even_if_inactive) | 175 | if (!NILP (Vtransient_mark_mode) && NILP (Vmark_even_if_inactive) |
| 176 | && NILP (current_buffer->mark_active)) | 176 | && NILP (current_buffer->mark_active)) |
| 177 | Fsignal (Qmark_inactive, Qnil); | 177 | xsignal0 (Qmark_inactive); |
| 178 | } | 178 | } |
| 179 | 179 | ||
| 180 | /* If the list of args INPUT was produced with an explicit call to | 180 | /* If the list of args INPUT was produced with an explicit call to |
| @@ -563,7 +563,7 @@ If KEYS is omitted or nil, the return value of `this-command-keys' is used. */) | |||
| 563 | break; | 563 | break; |
| 564 | 564 | ||
| 565 | case 'c': /* Character */ | 565 | case 'c': /* Character */ |
| 566 | args[i] = Fread_char (build_string (callint_message), Qnil); | 566 | args[i] = Fread_char (build_string (callint_message), Qnil, Qnil); |
| 567 | message1_nolog ((char *) 0); | 567 | message1_nolog ((char *) 0); |
| 568 | /* Passing args[i] directly stimulates compiler bug */ | 568 | /* Passing args[i] directly stimulates compiler bug */ |
| 569 | teml = args[i]; | 569 | teml = args[i]; |
| @@ -635,7 +635,7 @@ If KEYS is omitted or nil, the return value of `this-command-keys' is used. */) | |||
| 635 | /* Ignore first element, which is the base key. */ | 635 | /* Ignore first element, which is the base key. */ |
| 636 | tem2 = Fmemq (intern ("down"), Fcdr (teml)); | 636 | tem2 = Fmemq (intern ("down"), Fcdr (teml)); |
| 637 | if (! NILP (tem2)) | 637 | if (! NILP (tem2)) |
| 638 | up_event = Fread_event (Qnil, Qnil); | 638 | up_event = Fread_event (Qnil, Qnil, Qnil); |
| 639 | } | 639 | } |
| 640 | } | 640 | } |
| 641 | break; | 641 | break; |
| @@ -663,7 +663,7 @@ If KEYS is omitted or nil, the return value of `this-command-keys' is used. */) | |||
| 663 | /* Ignore first element, which is the base key. */ | 663 | /* Ignore first element, which is the base key. */ |
| 664 | tem2 = Fmemq (intern ("down"), Fcdr (teml)); | 664 | tem2 = Fmemq (intern ("down"), Fcdr (teml)); |
| 665 | if (! NILP (tem2)) | 665 | if (! NILP (tem2)) |
| 666 | up_event = Fread_event (Qnil, Qnil); | 666 | up_event = Fread_event (Qnil, Qnil, Qnil); |
| 667 | } | 667 | } |
| 668 | } | 668 | } |
| 669 | break; | 669 | break; |