summaryrefslogtreecommitdiff
path: root/src/process.c
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2006-02-25 16:49:00 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2006-02-25 16:49:00 +0000
commit2714f276bb1ffa3529c963ee941b9c2014506387 (patch)
tree53bc01dc1b16cf71d31ed0d8d25107f97de0d36d /src/process.c
parentd2ce13f97d900f68ac047aa49db9614ae9969f45 (diff)
downloademacs-2714f276bb1ffa3529c963ee941b9c2014506387.tar.gz
(Fmake_network_process): Init the process's mark.
Diffstat (limited to 'src/process.c')
-rw-r--r--src/process.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/process.c b/src/process.c
index 5a98ee024c1..1c0b196b3cf 100644
--- a/src/process.c
+++ b/src/process.c
@@ -1582,7 +1582,7 @@ usage: (start-process NAME BUFFER PROGRAM &rest PROGRAM-ARGS) */)
#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 @@ usage: (make-network-process &rest ARGS) */)
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)
{