# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1140886140 0
# Node ID 08c9c1760e1c17e4714d861e0c7e5ed404f8b93f
# Parent  088a76f85c2aa3e5ada4ee7e66c90039f64b713f
(Fmake_network_process): Init the process's mark.

diff -r 088a76f85c2a -r 08c9c1760e1c src/ChangeLog
--- a/src/ChangeLog	Sat Feb 25 11:25:25 2006 +0000
+++ b/src/ChangeLog	Sat Feb 25 16:49:00 2006 +0000
@@ -1,3 +1,7 @@
+2006-02-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* process.c (Fmake_network_process): Init the process's mark.
+
 2006-02-25  Kim F. Storm  <storm@cua.dk>
 
 	* buffer.c (modify_overlay): Force redisplay if we modify an
diff -r 088a76f85c2a -r 08c9c1760e1c src/process.c
--- a/src/process.c	Sat Feb 25 11:25:25 2006 +0000
+++ b/src/process.c	Sat Feb 25 16:49:00 2006 +0000
@@ -1582,7 +1582,7 @@
 #endif
 
   /* Make the process marker point into the process buffer (if any).  */
-  if (!NILP (buffer))
+  if (BUFFERP (buffer))
     set_marker_both (XPROCESS (proc)->mark, buffer,
 		     BUF_ZV (XBUFFER (buffer)),
 		     BUF_ZV_BYTE (XBUFFER (buffer)));
@@ -3355,6 +3355,12 @@
   if (is_server && socktype == SOCK_STREAM)
     p->status = Qlisten;
 
+  /* Make the process marker point into the process buffer (if any).  */
+  if (BUFFERP (buffer))
+    set_marker_both (p->mark, buffer,
+		     BUF_ZV (XBUFFER (buffer)),
+		     BUF_ZV_BYTE (XBUFFER (buffer)));
+
 #ifdef NON_BLOCKING_CONNECT
   if (is_non_blocking_client)
     {