changeset 44070:51fae9813831

Test for network process support with featurep.
author Kim F. Storm <storm@cua.dk>
date Thu, 21 Mar 2002 12:35:53 +0000
parents a980adfcce47
children 32fbb48c7bc6
files lisp/simple.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Thu Mar 21 12:23:22 2002 +0000
+++ b/lisp/simple.el	Thu Mar 21 12:35:53 2002 +0000
@@ -4206,7 +4206,7 @@
 
 ;;; make-network-process wrappers
 
-(if (fboundp 'make-network-process)
+(if (featurep 'make-network-process)
     (progn
 
 (defun open-network-stream (name buffer host service)
@@ -4271,7 +4271,7 @@
       (make-network-process :name name :buffer buffer
 			    :service service :server t :noquery t)))
 
-))  ;; (fboundp 'make-network-process)
+))  ;; (featurep 'make-network-process)
 
 
 ;; compatibility