(create_pty): Fix last change.

diff --git a/src/ChangeLog b/src/ChangeLog
index fb194ed5e27fb29bd3a28ee6440595785ae1c958..5e78a64a0ba781d2b9ac0573f2d6fcff3ef98680 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-08-14  Eli Zaretskii  <eliz@gnu.org>
+
+       * process.c (create_pty): Fix last change.
+
 2009-08-13  Chong Yidong  <cyd@stupidchicken.com>
 
        * image.c (xbm_read_bitmap_data): New arg inhibit_image_error.

diff --git a/src/process.c b/src/process.c
index 15ed971b3e28d720f9615eefc260de0e4e1dec98..56a8d189f9971f7da77c6993fda0500c61109c56 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -2355,7 +2355,12 @@ create_pty (process)
     max_process_desc = inchannel;
 
   XPROCESS (process)->pid = -2;
-  XPROCESS (process)->tty_name = build_string (pty_name);
+#ifdef HAVE_PTYS
+  if (pty_flag)
+    XPROCESS (process)->tty_name = build_string (pty_name);
+  else
+#endif
+    XPROCESS (process)->tty_name = Qnil;
 }
 
 \f