 
 (user-keys-mode t)
 
-(defun user-keys-init-map ()
+(progn
   (user-keys-reset)
   
   (setcdr user-keys-mode-map nil)

  (user-keys-subkey "f" 'my-toggle-fullscreen)

  )

(user-keys-init-map)

; Dynamic abbrev should copy the word it finds verbatim
(setq dabbrev-case-replace nil)

  ;; Alt-Space for marking as well.
  (user-keys-alias "C-SPC" "M-SPC")

  (user-keys-subkey "s" 'my-2-window-split)

  ;; Bindings to call the action overriden with user-keys-prefix
  (user-keys-subkey "q" (user-keys-overwritten-prefix-command))
