Edi Weitz edi@agharta.de writes:
(global-set-key [(f6)] '(lambda () (interactive) (shell-command "c:/PROGRA~1/acl70/alisp.exe +B +cm -L ~/.slime.lisp&")
(while (not (ignore-erorrs (progn (slime-connect "localhost" 4005) t))) (sit-for 0.2))
.. might do the trick. (sorry, not tested.)