--- a/.emacs-my	Thu Aug 30 14:03:00 2012 +0300
+++ b/.emacs-my	Fri Aug 31 17:44:40 2012 +0300
@@ -372,6 +372,14 @@
 (setq explicit-sh-args '("-i"))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "term")
+
+(defun my-term-send-forward-word () (interactive) (term-send-raw-string "\ef"))
+(defun my-term-send-backward-word () (interactive) (term-send-raw-string "\eb"))
+(define-key term-raw-map [C-left] 'my-term-backward-word)
+(define-key term-raw-map [C-right] 'my-term-forward-word)
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "whitespaces")
 
 (setq default-indicate-empty-lines t)