[slime-devel] slime-toggle-connection

Hi,

I find this function very useful, so I suggest that it be included.

(defun slime-toggle-connection () "Change current slime connection, and make it buffer local" (interactive) (setf slime-net-processes (rotate-list slime-net-processes)) (let ((p (car slime-net-processes))) (make-local-variable 'slime-default-connection) ;; To have different files with different lisps (slime-select-connection p) (slime-set-state (format "(%s)" (slime-connection-name p)) p) (message "Lisp: %s, buffer: %s" (process-contact p) (slime-connection-name p))))

And, I have bound these keys: (define-key slime-mode-map [f12] 'slime-toggle-connection) (define-key slime-mode-map [f11] 'slime-goto-current-connection)