From 7b4c5a62dbb6bfa6d5fc097abd2741ec0ed1ac76 Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Sun, 6 Mar 2022 21:46:46 +0100 Subject: [PATCH] [StumpWM] Update sly functions Rename `start-sly-server` to `sly-start-server`. Add `stop-sly-server`. It will always try to stop a server running on port 4005 (default port used by `sly-start-server`) --- org/config/stumpwm.org | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/org/config/stumpwm.org b/org/config/stumpwm.org index 19459db..96efe39 100644 --- a/org/config/stumpwm.org +++ b/org/config/stumpwm.org @@ -1163,9 +1163,13 @@ The first thing to do is load ~slynk~, SLY’s server: Now we can define a command to launch the server. I don’t want it to run all the time, just when I need it. #+begin_src lisp -(stumpwm:defcommand start-sly-server () () - "Start a SLYNK server for SLY" +(stumpwm:defcommand sly-start-server () () + "Start a slynk server for sly." (slynk:create-server :dont-close t)) + +(stumpwm:defcommand sly-stop-server () () + "Stop current slynk server for sly." + (slynk:stop-server 4005)) #+end_src ** ~swm-ssh~