updates
[emacs-init.git] / setup / windmove.el
index e463ba0..41b1fba 100644 (file)
@@ -1,5 +1,15 @@
 (require 'windmove)
-(global-set-key (kbd "S-<left>") 'windmove-left)
-(global-set-key (kbd "S-<right>") 'windmove-right)
-(global-set-key (kbd "S-<up>") 'windmove-up)
-(global-set-key (kbd "S-<down>") 'windmove-down)
+(require 'framemove)
+
+(if window-system
+    (progn
+      (global-set-key (kbd "S-<left>") 'windmove-left)
+      (global-set-key (kbd "S-<right>") 'windmove-right)
+      (global-set-key (kbd "S-<up>") 'windmove-up)
+      (global-set-key (kbd "S-<down>") 'windmove-down))
+  (global-set-key (kbd "C-c <left>") 'windmove-left)
+  (global-set-key (kbd "C-c <right>") 'windmove-right)
+  (global-set-key (kbd "C-c <up>") 'windmove-up)
+  (global-set-key (kbd "C-c <down>") 'windmove-down))
+
+ (setq framemove-hook-into-windmove t)