setup/windmove.el

   1 (require 'windmove)
   2 (require 'framemove)
   3
   4 (if window-system
   5     (progn
   6       (global-set-key (kbd "S-<left>") 'windmove-left)
   7       (global-set-key (kbd "S-<right>") 'windmove-right)
   8       (global-set-key (kbd "S-<up>") 'windmove-up)
   9       (global-set-key (kbd "S-<down>") 'windmove-down))
  10   (global-set-key (kbd "C-c <left>") 'windmove-left)
  11   (global-set-key (kbd "C-c <right>") 'windmove-right)
  12   (global-set-key (kbd "C-c <up>") 'windmove-up)
  13   (global-set-key (kbd "C-c <down>") 'windmove-down))
  14
  15  (setq framemove-hook-into-windmove t)