# HG changeset patch
# User Mikael Berthe <mikael@lilotux.net>
# Date 1143137467 -3600
# Node ID 0f6d25a024503b11ebd8fa77ae98774943a68301
# Parent  d8d17eeb2988e00f5e7661ea3ee51624e4cd1fdb
Add PuTTY escape keys for Ctrl-arrows

diff -r d8d17eeb2988 -r 0f6d25a02450 mcabber/src/screen.c
--- a/mcabber/src/screen.c	Sun Mar 19 17:10:05 2006 +0100
+++ b/mcabber/src/screen.c	Thu Mar 23 19:11:07 2006 +0100
@@ -251,6 +251,12 @@
   add_keyseq("[5;5~", MKEY_CTRL_PGUP, 0);   // Ctrl-PageUp
   add_keyseq("[6;5~", MKEY_CTRL_PGDOWN, 0); // Ctrl-PageDown
 
+  // PuTTY
+  add_keyseq("[A", MKEY_EQUIV, 521); // Ctrl-Up
+  add_keyseq("[B", MKEY_EQUIV, 514); // Ctrl-Down
+  add_keyseq("[C", MKEY_EQUIV, 518); // Ctrl-Right
+  add_keyseq("[D", MKEY_EQUIV, 516); // Ctrl-Left
+
   // screen
   add_keyseq("Oa", MKEY_EQUIV, 521); // Ctrl-Up
   add_keyseq("Ob", MKEY_EQUIV, 514); // Ctrl-Down