.emacs-my
changeset 925 545ceb8d87be
parent 924 3e398de9b2c1
child 926 1ad4d40e5b5e
equal deleted inserted replaced
924:3e398de9b2c1 925:545ceb8d87be
   376 
   376 
   377 (eval-after-load 'term
   377 (eval-after-load 'term
   378   '(progn
   378   '(progn
   379     (defun my-term-send-forward-word () (interactive) (term-send-raw-string "\ef"))
   379     (defun my-term-send-forward-word () (interactive) (term-send-raw-string "\ef"))
   380     (defun my-term-send-backward-word () (interactive) (term-send-raw-string "\eb"))
   380     (defun my-term-send-backward-word () (interactive) (term-send-raw-string "\eb"))
   381     (define-key term-raw-map [C-left] 'my-term-backward-word)
   381     (define-key term-raw-map [C-left] 'my-term-send-backward-word)
   382     (define-key term-raw-map [C-right] 'my-term-forward-word)))
   382     (define-key term-raw-map [C-right] 'my-term-send-forward-word)))
   383 
   383 
   384 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   384 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   385 (message "whitespaces")
   385 (message "whitespaces")
   386 
   386 
   387 (setq default-indicate-empty-lines t)
   387 (setq default-indicate-empty-lines t)