(defun initialize-user-parameters ()
(loop for (keyword variable) in *user-configurable-parameters* do
(awhen (get-user-configuration-parameter keyword)
(setq variable it))))
^^^^
this should be SET, not SETQ, because variable is already quoted!