+(run-with-idle-timer 0.1 nil #'require 'windmove)
+(with-eval-after-load 'windmove
+ (csetq windmove-wrap-around t)
+ (global-set-key (kbd "M-H") #'windmove-left)
+ (global-set-key (kbd "M-L") #'windmove-right)
+ (global-set-key (kbd "M-K") #'windmove-up)
+ (global-set-key (kbd "M-J") #'windmove-down))
+