Productivity module issues leading to extreme unproductivity

[yusi1]

Productivity module issues leading to extreme unproductivity

[yusi1]

I think it must be a problem with my system since productivity mode literally just rebinds C-w to the function productivity-back-to-work making it temporarily unusable I think, but I don't know why this could be happening.

[yusi1]

Okay so I narrowed it down to this bit in the productivity module source code (https://github.com/stumpwm/stumpwm-contrib/blob/master/util/productivity/productivity.lisp#L20):

(defvar *productivity-keys* '(("C-t" *root-map*))
  "List of all the keys you have bound to your `*top-map*'
and their associated commands.")

I changed it to:

(defvar *productivity-keys* '(("C-w" *root-map*))
  "List of all the keys you have bound to your `*top-map*'
and their associated commands.")

And the productivity mode now blocks me from doing anything with C-w as it should, and it doesn't do anything with C-t.

But now I wonder, why isn't setf working in my config to change that variable to something else?
Shouldn't this work? :

(setf *productivity-keys*
      '(("C-w" *root-map*)))

[yusi1]

So the problem is with setf not working in my init.lisp, does someone know why?

[yusi1]

Deleted all my previous comments since I think I found the problem, but I still don't know what is causing it.