From: Andreas Schwab <schwab@linux-m68k.org>
Date: Sun, 28 Jun 2009 20:26:48 +0000 (+0000)
Subject: Simplify last change.
X-Git-Tag: emacs-pretest-23.0.96~65
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=703a59c0c54668a9c848095d4d818b49c2994015;p=emacs.git

Simplify last change.
---

diff --git a/src/process.c b/src/process.c
index 38980d28383..058e20be03b 100644
--- a/src/process.c
+++ b/src/process.c
@@ -5550,11 +5550,10 @@ send_process (proc, buf, len, object)
   struct Lisp_Process *p = XPROCESS (proc);
   int rv;
   struct coding_system *coding;
-  struct gcpro gcpro1, gcpro2;
+  struct gcpro gcpro1;
   SIGTYPE (*volatile old_sigpipe) ();
-  Lisp_Object dst_object = Qnil;
 
-  GCPRO2 (object, dst_object);
+  GCPRO1 (object);
 
   if (p->raw_status_new)
     update_status (p);
@@ -5633,8 +5632,8 @@ send_process (proc, buf, len, object)
 	}
 
       len = coding->produced;
-      dst_object = coding->dst_object;
-      buf = SDATA (dst_object);
+      object = coding->dst_object;
+      buf = SDATA (object);
     }
 
   if (pty_max_bytes == 0)
@@ -5765,9 +5764,7 @@ send_process (proc, buf, len, object)
 
 		      /* Running filters might relocate buffers or strings.
 			 Arrange to relocate BUF.  */
-		      if (CODING_REQUIRE_ENCODING (coding))
-			offset = buf - SDATA (dst_object);
-		      else if (BUFFERP (object))
+		      if (BUFFERP (object))
 			offset = BUF_PTR_BYTE_POS (XBUFFER (object), buf);
 		      else if (STRINGP (object))
 			offset = buf - SDATA (object);
@@ -5778,9 +5775,7 @@ send_process (proc, buf, len, object)
 		      wait_reading_process_output (1, 0, 0, 0, Qnil, NULL, 0);
 #endif
 
-		      if (CODING_REQUIRE_ENCODING (coding))
-			buf = offset + SDATA (dst_object);
-		      else if (BUFFERP (object))
+		      if (BUFFERP (object))
 			buf = BUF_BYTE_ADDRESS (XBUFFER (object), offset);
 		      else if (STRINGP (object))
 			buf = offset + SDATA (object);