diff options
author | Karoly Lorentey <karoly@lorentey.hu> | 2007-04-22 11:42:03 +0000 |
---|---|---|
committer | Karoly Lorentey <karoly@lorentey.hu> | 2007-04-22 11:42:03 +0000 |
commit | 81088e260b086fe28f36964f32b6338210ec6fd8 (patch) | |
tree | 53d5af73ca0c971fe6925944d4d059caab5337a2 /src | |
parent | fa1b1007cac59bafd16df7bd501ef2591dd77d62 (diff) | |
parent | a6f0e674ebf44b1d37732b64070b804673481d28 (diff) | |
download | emacs-81088e260b086fe28f36964f32b6338210ec6fd8.tar.gz emacs-81088e260b086fe28f36964f32b6338210ec6fd8.tar.bz2 emacs-81088e260b086fe28f36964f32b6338210ec6fd8.zip |
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-650
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-651
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-652
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-653
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-654
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-655
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-656
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-657
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-658
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-659
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-203
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-204
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-205
Update from CVS
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-599
Diffstat (limited to 'src')
-rw-r--r-- | src/.gdbinit | 2 | ||||
-rw-r--r-- | src/ChangeLog | 24 | ||||
-rw-r--r-- | src/insdel.c | 11 | ||||
-rw-r--r-- | src/keymap.c | 4 | ||||
-rw-r--r-- | src/m/alpha.h | 2 | ||||
-rw-r--r-- | src/m/macppc.h | 2 | ||||
-rw-r--r-- | src/m/mips4.h | 2 | ||||
-rw-r--r-- | src/m/news-risc.h | 2 | ||||
-rw-r--r-- | src/m/xtensa.h | 15 | ||||
-rw-r--r-- | src/process.c | 10 |
10 files changed, 66 insertions, 8 deletions
diff --git a/src/.gdbinit b/src/.gdbinit index 8d8c163b3b6..d3438a81e6a 100644 --- a/src/.gdbinit +++ b/src/.gdbinit @@ -977,7 +977,7 @@ Print $ as a lisp object of any type. end define xprintstr - set $data = $arg0->data + set $data = (char *) $arg0->data output ($arg0->size > 1000) ? 0 : ($data[0])@($arg0->size_byte < 0 ? $arg0->size & ~gdb_array_mark_flag : $arg0->size_byte) end diff --git a/src/ChangeLog b/src/ChangeLog index c7f40ce8100..d9633301be2 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,27 @@ +2007-03-02 Stuart D. Herring <herring@lanl.gov> + + * keymap.c (Fkey_binding): Don't consider two-element lists as + events. + +2007-03-01 Kenichi Handa <handa@m17n.org> + + * process.c (send_process_object): Check the process status and + signal an error if something is wrong. + +2007-02-28 Chong Yidong <cyd@stupidchicken.com> + + * insdel.c (Fcombine_after_change_execute): Return nil if + combine_after_change_buffer has been invalidated. + +2007-02-25 Dan Nicolaescu <dann@ics.uci.edu> + + * m/xtensa.h: New file. + +2007-02-24 Nick Roberts <nickrob@snap.net.nz> + + * .gdbinit (xprintstr): Ensure GDB (> 6.6) prints symbol name + as strings and not character arrays. + 2007-02-24 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> * macterm.c [USE_TOOLKIT_SCROLL_BARS] (x_scroll_bar_handle_drag) diff --git a/src/insdel.c b/src/insdel.c index 08043147cdf..7f15f7de52d 100644 --- a/src/insdel.c +++ b/src/insdel.c @@ -2351,6 +2351,17 @@ DEFUN ("combine-after-change-execute", Fcombine_after_change_execute, if (NILP (combine_after_change_list)) return Qnil; + /* It is rare for combine_after_change_buffer to be invalid, but + possible. It can happen when combine-after-change-calls is + non-nil, and insertion calls a file handler (e.g. through + lock_file) which scribbles into a temp file -- cyd */ + if (!BUFFERP (combine_after_change_buffer) + || NILP (XBUFFER (combine_after_change_buffer)->name)) + { + combine_after_change_list = Qnil; + return Qnil; + } + record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); Fset_buffer (combine_after_change_buffer); diff --git a/src/keymap.c b/src/keymap.c index c85c37aae12..0f1e922969c 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -1605,10 +1605,10 @@ specified buffer position instead of point are used. /* We are not interested in locations without event data */ - if (EVENT_HAS_PARAMETERS (event)) + if (EVENT_HAS_PARAMETERS (event) && CONSP (XCDR (event))) { Lisp_Object kind = EVENT_HEAD_KIND (EVENT_HEAD (event)); - if (CONSP (XCDR (event)) && EQ (kind, Qmouse_click)) + if (EQ (kind, Qmouse_click)) position = EVENT_START (event); } } diff --git a/src/m/alpha.h b/src/m/alpha.h index cf629c20291..6a9f09ed0bd 100644 --- a/src/m/alpha.h +++ b/src/m/alpha.h @@ -6,7 +6,7 @@ This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, diff --git a/src/m/macppc.h b/src/m/macppc.h index eba0a401a18..117d7a11dc4 100644 --- a/src/m/macppc.h +++ b/src/m/macppc.h @@ -6,7 +6,7 @@ This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, diff --git a/src/m/mips4.h b/src/m/mips4.h index 06db7d5dff0..f9517d6b560 100644 --- a/src/m/mips4.h +++ b/src/m/mips4.h @@ -7,7 +7,7 @@ This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, diff --git a/src/m/news-risc.h b/src/m/news-risc.h index 07e055dac9a..0a2564553f7 100644 --- a/src/m/news-risc.h +++ b/src/m/news-risc.h @@ -7,7 +7,7 @@ This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, diff --git a/src/m/xtensa.h b/src/m/xtensa.h new file mode 100644 index 00000000000..049874635d8 --- /dev/null +++ b/src/m/xtensa.h @@ -0,0 +1,15 @@ +/* Machine description file for Tensilica Xtensa. + +Add a license notice if this grows to > 10 lines of code. */ + +#define NO_ARG_ARRAY +#define NO_UNION_TYPE + +#ifdef __LITTLE_ENDIAN +#undef WORDS_BIG_ENDIAN +#else +#define WORDS_BIG_ENDIAN +#endif + +/* arch-tag: fe5872de-d565-4d81-8fe0-ea19865b3e6a + (do not change this comment) */ diff --git a/src/process.c b/src/process.c index d11a300363d..8b1da4ac5cc 100644 --- a/src/process.c +++ b/src/process.c @@ -5699,8 +5699,16 @@ send_process_object (proc, start, end) : ! NILP (XBUFFER (object)->enable_multibyte_characters)) { struct Lisp_Process *p = XPROCESS (proc); - struct coding_system *coding = proc_encode_coding_system[XINT (p->outfd)]; + struct coding_system *coding; + if (p->raw_status_new) + update_status (p); + if (! EQ (p->status, Qrun)) + error ("Process %s not running", SDATA (p->name)); + if (XINT (p->outfd) < 0) + error ("Output file descriptor of %s is closed", SDATA (p->name)); + + coding = proc_encode_coding_system[XINT (p->outfd)]; if (! EQ (coding->symbol, p->encode_coding_system)) /* The coding system for encoding was changed to raw-text because we sent a unibyte text previously. Now we are |