    :prefix "<f4>"
     "g"     #'general-describe-keybindings)
   (general-define-key "s-." #'repeat)
+  (general-define-key "s-s" #'save-buffer)
   :demand)
 
 ;; make describe-xxx more useful

      "h"          #'hydra-diff-hl/body
      "l"          #'avy-goto-char-in-line
      "p"          #'hydra-paste/body
      "w"          #'save-buffer
      "x"          #'exchange-point-and-mark
      "<DEL>"      #'kill-this-buffer)
    (:states '(normal visual) :prefix "<SPC>" :keymaps 'override
             "s"  (general-simulate-key "\"*" :state 'normal :keymap nil :lookup nil :name me:simulate-selection-reg )
             "c"  (general-simulate-key "\"+" :state 'normal :keymap nil :lookup nil :name me:simulate-clipboard-reg ))

  :general
    ("s-n"        #'next-error)
    ("s-p"        #'previous-error)
    ("s-<backspace>"    #'kill-current-buffer)
  :init
  (setq kill-ring-max 200                      ; More killed items
        kill-do-not-save-duplicates t          ; No duplicates in kill ring
