11 lines
488 B
Common Lisp
11 lines
488 B
Common Lisp
|
(define-command start-slynk (&optional (slynk-port *swank-port*))
|
||
|
|
"Start a Slynk server that can be connected to, for instance, in
|
||
|
|
Emacs via SLY.
|
||
|
|
|
||
|
|
Warning: This allows Next to be controlled remotely, that is, to
|
||
|
|
execute arbitrary code with the privileges of the user running Next.
|
||
|
|
Make sure you understand the security risks associated with this
|
||
|
|
before running this command."
|
||
|
|
(slynk:create-server :port slynk-port :dont-close t)
|
||
|
|
(echo "Slynk server started at port ~a" slynk-port))
|