Mercurial > emacs

comparison lisp/server.el @ 83395:b31326248cf6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from miles@gnu.org--gnu-2005 (patch 142-148, 615-628) Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-615 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-616 Add lisp/mh-e/.arch-inventory * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-617 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-618 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-619 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-620 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-621 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-622 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-623 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-624 Update from CVS: lisp/smerge-mode.el: Add 'tools' to file keywords. * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-625 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-626 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-627 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-628 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-142 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-143 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-144 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-145 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-146 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-147 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-148 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-435
author Karoly Lorentey <lorentey@elte.hu>
date Tue, 01 Nov 2005 06:23:08 +0000
parents 2a679c81f552 ad0d12f9aa9e
children 51eb0aa362f3
comparison
equal deleted inserted replaced
83394:7d093d9d4479 83395:b31326248cf6
306 string) 306 string)
307 (or (bolp) (newline))))) 307 (or (bolp) (newline)))))
308 308
309 (defun server-sentinel (proc msg) 309 (defun server-sentinel (proc msg)
310 "The process sentinel for Emacs server connections." 310 "The process sentinel for Emacs server connections."
311 ;; If this is a new client process, set the query-on-exit flag to nil
312 ;; for this process (it isn't inherited from the server process).
313 (when (and (eq (process-status proc) 'open)
314 (process-query-on-exit-flag proc))
315 (set-process-query-on-exit-flag proc nil))
311 (server-log (format "Status changed to %s: %s" (process-status proc) msg) proc) 316 (server-log (format "Status changed to %s: %s" (process-status proc) msg) proc)
312 (server-delete-client proc)) 317 (server-delete-client proc))
313 318
314 (defun server-handle-delete-frame (frame) 319 (defun server-handle-delete-frame (frame)
315 "Delete the client connection when the emacsclient frame is deleted." 320 "Delete the client connection when the emacsclient frame is deleted."