[Emacs-diffs] trunk r115197: * src/process.c (get_process): Explicit error for dead buffers

[Glenn Morris]

------------------------------------------------------------
revno: 115197
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Fri 2013-11-22 18:58:28 -0800
message:
  * src/process.c (get_process): Explicit error for dead buffers
  That seems more in keeping with the existing behavior of this function
  in other situations.
modified:
  src/ChangeLog                  changelog-20091113204419-o5vbwnq5f7feedwu-1438
  src/process.c                  process.c-20091113204419-o5vbwnq5f7feedwu-462

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2013-11-23 02:24:50 +0000
+++ b/src/ChangeLog     2013-11-23 02:58:28 +0000
@@ -1,3 +1,7 @@
+2013-11-23  Glenn Morris  <address@hidden>
+
+       * process.c (get_process): Explicit error for dead buffers.
+
 2013-11-23  Andreas Schwab  <address@hidden>
 
        * process.c (get_process): Check that OBJ is a live buffer.  (Bug#15923)

=== modified file 'src/process.c'
--- a/src/process.c     2013-11-23 02:24:50 +0000
+++ b/src/process.c     2013-11-23 02:58:28 +0000
@@ -1,7 +1,7 @@
 /* Asynchronous subprocess control for GNU Emacs.
 
-Copyright (C) 1985-1988, 1993-1996, 1998-1999, 2001-2013 Free Software
-Foundation, Inc.
+Copyright (C) 1985-1988, 1993-1996, 1998-1999, 2001-2013
+  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -812,12 +812,14 @@
   else
     obj = name;
 
-  /* Now obj should be either a (live) buffer object or a process object.  */
-  if (BUFFERP (obj) && !NILP (BVAR (XBUFFER (obj), name)))
+  /* Now obj should be either a buffer object or a process object.  */
+  if (BUFFERP (obj))
     {
+      if (NILP (BVAR (XBUFFER (obj), name)))
+        error ("Attempt to get process for a dead buffer");
       proc = Fget_buffer_process (obj);
       if (NILP (proc))
-       error ("Buffer %s has no process", SDATA (BVAR (XBUFFER (obj), name)));
+        error ("Buffer %s has no process", SDATA (BVAR (XBUFFER (obj), name)));
     }
   else
     {