[STUMP] Problems loading swank

Hi. I have the following code in my ~/.stumpwmrc to define a command that
loads swank and binds it to a key combo:

(ql:quickload :swank)
(swank-loader:init)

(let ((server-running nil))
  (defcommand swank () ()
              (if server-running
                  (progn
                    (swank:stop-server 4005)
                    (echo-string
                     (current-screen)
                     "stopping swank")
                    (setf server-running nil))
                  (progn
                    (swank:create-server :port 4005
                                         :style swank:*communication-style*
                                         :dont-close t)
                    (echo-string (current-screen)
                                 "starting swank. M-x slime-connect RET
RET, then (in-package stumpwm)..")
                    (setf server-running t)))))

(define-key *root-map* (kbd "C-s") "swank")

That code used to work, but I've updated stumpwm a few times since I used
that `swank` command last, and now this code doesn't work anymore.

I tried debugging the issue, but I can't find any stumpwm startup log files
to get any information about what could be wrong. I tried starting stump
with `startx -- :1`, but I got no information from that.

I have two questions. First, does anyone know where the stumpwm startup log
is? And second, does anyone know what is broken about this code to start
swank?

_______________________________________________
Stumpwm-devel mailing list
[email protected]
https://lists.nongnu.org/mailman/listinfo/stumpwm-devel