emacs server with X11 build on OSX

[Leo]

Hello,

(progn
  (require 'server)
  (setq server-use-tcp t)
  (server-start))

generates an error:

Debugger entered--Lisp error: (error "localhost/0 nodename nor servname 
provided, or not known")
  make-network-process(:name "server" :server t :noquery t :sentinel 
server-sentinel :filter server-process-filter :coding raw-text-unix :family nil 
:service t :host local :plist (:authenticated nil))
  apply(make-network-process :name "server" :server t :noquery t :sentinel 
server-sentinel :filter server-process-filter :coding raw-text-unix (:family 
nil :service t :host local :plist (:authenticated nil)))
  server-start()
  (progn (require (quote server)) (setq server-use-tcp t) (server-start))
  eval((progn (require (quote server)) (setq server-use-tcp t) (server-start)))
  eval-last-sexp-1(nil)
  eval-last-sexp(nil)
  call-interactively(eval-last-sexp nil nil)

Any idea how to fix this?

Tested with GNU Emacs 23.2.3 (x86_64-apple-darwin10.3.0, X toolkit)
 of 2010-05-23 on Victoria.local.

Leo