summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorKaroly Lorentey <karoly@lorentey.hu>2007-04-22 11:42:03 +0000
committerKaroly Lorentey <karoly@lorentey.hu>2007-04-22 11:42:03 +0000
commit81088e260b086fe28f36964f32b6338210ec6fd8 (patch)
tree53d5af73ca0c971fe6925944d4d059caab5337a2 /src
parentfa1b1007cac59bafd16df7bd501ef2591dd77d62 (diff)
parenta6f0e674ebf44b1d37732b64070b804673481d28 (diff)
downloademacs-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/.gdbinit2
-rw-r--r--src/ChangeLog24
-rw-r--r--src/insdel.c11
-rw-r--r--src/keymap.c4
-rw-r--r--src/m/alpha.h2
-rw-r--r--src/m/macppc.h2
-rw-r--r--src/m/mips4.h2
-rw-r--r--src/m/news-risc.h2
-rw-r--r--src/m/xtensa.h15
-rw-r--r--src/process.c10
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