[Emacs-diffs] Changes to emacs/lisp/simple.el

[Kim F. Storm]

Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.525 emacs/lisp/simple.el:1.526
*** emacs/lisp/simple.el:1.525  Sun Mar 17 15:28:53 2002
--- emacs/lisp/simple.el        Thu Mar 21 07:23:22 2002
***************
*** 4240,4246 ****
  NAME, BUFFER, HOST, and SERVICE are as for `open-network-stream'.
  Optional args, SENTINEL and FILTER specifies the sentinel and filter
  functions to be used for this network stream."
!   (if (make-network-process :feature :nowait t)
        (make-network-process :name name :buffer buffer :nowait t
                            :host host :service service
                            :filter filter :sentinel sentinel)))
--- 4240,4246 ----
  NAME, BUFFER, HOST, and SERVICE are as for `open-network-stream'.
  Optional args, SENTINEL and FILTER specifies the sentinel and filter
  functions to be used for this network stream."
!   (if (featurep 'make-network-process  '(:nowait t))
        (make-network-process :name name :buffer buffer :nowait t
                            :host host :service service
                            :filter filter :sentinel sentinel)))
***************
*** 4267,4273 ****
  Optional args, SENTINEL and FILTER specifies the sentinel and filter
  functions to be used for the client processes; the server process
  does not use these function."
!   (if (make-network-process :feature :server t)
        (make-network-process :name name :buffer buffer
                            :service service :server t :noquery t)))
  
--- 4267,4273 ----
  Optional args, SENTINEL and FILTER specifies the sentinel and filter
  functions to be used for the client processes; the server process
  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)))