[slime-cvs] CVS slime

[heller]

Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv32480

Modified Files:
	swank.lisp 
Log Message:
(create-swank-server): Deleted. Use create-server instead.


--- /project/slime/cvsroot/slime/swank.lisp	2006/11/21 20:35:44	1.419
+++ /project/slime/cvsroot/slime/swank.lisp	2006/12/05 13:54:34	1.420
@@ -16,7 +16,6 @@
   (:use :common-lisp :swank-backend)
   (:export #:startup-multiprocessing
            #:start-server 
-           #:create-swank-server
            #:create-server
            #:ed-in-emacs
            #:print-indentation-lossage
@@ -440,12 +439,6 @@
   (or (find-external-format coding-system)
       (error "Unsupported coding system: ~s" coding-system)))
 
-(defun create-swank-server (&optional (port default-server-port)
-                            (style *communication-style*)
-                            (announce-fn #'simple-announce-function)
-                            dont-close (external-format *coding-system*))
-  (setup-server port announce-fn style dont-close external-format))
-
 (defparameter *loopback-interface* "127.0.0.1")
 
 (defun setup-server (port announce-fn style dont-close external-format)