changeset 45567:1c1da92d278d

(open-network-stream-server): Pass on optional args sentinel and filter to make-network-process (from Luke Gorrie).
author Kim F. Storm <storm@cua.dk>
date Tue, 28 May 2002 22:04:14 +0000
parents 14cfefb5a227
children 431fa03cb605
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Tue May 28 22:03:41 2002 +0000
+++ b/lisp/simple.el	Tue May 28 22:04:14 2002 +0000
@@ -4328,7 +4328,8 @@
 does not use these function."
   (if (featurep 'make-network-process '(:server t))
       (make-network-process :name name :buffer buffer
-			    :service service :server t :noquery t)))
+			    :service service :server t :noquery t
+			    :sentinel sentinel :filter filter)))
 
 ))  ;; (featurep 'make-network-process)